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4 INTRODUCTION 
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...:■■., to the world of the Apple Graphics Tablet- The Tablet Is a 
dpvlri- whith converts tiie position and movements of a special pen 
Into aunb*M which your Apple can use and understand* The programs, 
or H iOlWir/| supplied with your Tablet tell the Apple how to draw 
piotupM on Us high-resolution graphics screen, using the infor- 
•atloo supplied by the Tablet* These programs turn your Apple and 
J Ublet Into an artist's sketchpad, an engineer's drawing board, or a 
mat ht-uutlc tan's chalkboard- With the Tablet and the supplied programs 
you CAD draw freehand pictures on Che Apple's screen, or use the Apple 
to draw straight lines* rectangular boxes, open frames, or tiny dots- 
Tin* pictures you create can easily be saved on Apple diskettes and 
a^ rural Led anytime you want* You can use the Apple to calculate the 
aruMt* and distances of shapes and lines you draw on the Tablet, and 
-> - _j you can change the scale of the figures you draw. 

Thin la thtf Operation and Reference Manual for the Apple Graphics 
*4 Tablut* Tliw Graphics Tablet is a "hands-on" product, and the best way 
lo learn how to use it is to take pen in hand and start experimenting* 
Hum ol i hi. -i book Is based on the assumption that you have the 
Qraphlc* Talilol wet up in front of you. and are following and doing 

•Mb Manplf an it is presented, if you try to learn how to use the 
Tablet without ualng this manual (or even worse, read the manual 
Without aciuitlly using the Tablet), you might pick up most of the 

»l*pl«r coNUHtdOi but you'll never master the more powerful functions 
of thu Tablot- So read the manual, repeat the examples, and don't be 
*( raid to t»M|Mii Uwut* 




Kirat i'U«|ii»r ol this book describes how to set up your Tablet, 
what you iwud In order to use it* Chapter 2 introduces you to the 
i|ihi»-*i ii*i"i.M »oitwar*< This is a set of progrua uhicfa allow you 
tu una thu labial to draw pictures on the Apple's high^resolution 
C mM gMphlr* ni-mmi. You do not need to know much about the Apple in 
•filtM to una (It* tiraphlcs Tablet* In fact, all you really need to 
-m hMW In how to turn It on* Once you start using the Tablet software* 
11 will gold* you Mich step of the way* You do not need to know how 

10 Wrlla program* lo una the Tablet skillfully and efficiently. 

11 you a<i tun** im* to program, you may be interested in Chapter 3- Lt 

— | will ftlva you aaalalance in modifying the Graphics Tablet software to 

^B »UUI llhl*i|ii Including adding your own features to the Tablet menu. 
^^ That* ara *l*o Instruction* on interfacing directly to the Tablet's 

tl -4fl fflVMMr*i •» V'«t Mn write your own spccial^purpose programs that will 
Mi* I ha Tahlal* Uaihv 

-^ HH "Wl |f A|i|i*iulU l>* 

ti m 
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uaa tha Tahlal < IU(!n K n of tlu* programs which Op era to the Tablet afe 
Mat 



If you sec the symbol 



® 



it means that the following paragraph contains important Information 
about sooe Tablet behavior that you might not anticipate. The symbol 



& 



laeans that the following paragraph contains special information you 
should note. Read these sections carefully. 

Above all, feel free to play around with the Tablet. The Apple 
Graphics Tablet is easy to learn, easy to use, and hard to mess up. 
With some staple maintenance (described in Appendix A), your Tablet 
will give you years of enjoyment and use* So sit down at your Apple, 
take pen in hand, and turn to Chapter 1. We'll let you... 
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WHAT YOU WILL NEED 



To use the Apple Graphics Tablet with its supplied software* you will 
need the following: 

1) An Apple II or Apple II Plus computer* with 48K bytes of 
Random Access Meiaory (RAM); 

2) If you do not have an Apple II Plus, you will need an 
Applesoft Firmware card (part number A2B0009), or an Apple 
Language System (part number A2B0006) with a BASICS 
language diskette; 

3) An Apple Disk 11 plug-In controller card with at least one 
Disk II disk drive; 

4) A color or black-and-white video monitor* 

In addition, you may wish to have additional Disk II disk drives and 
controller cards. 



X 

Tne Graphics Tablet wjih drulgned to work with oost present and future 

Apple 11 hardware and Hoitware- However, the supplied programs which 

operate the Graphics TjjdRh are designed to work with the Apple 11 DOS 

disk operating system, versions 3*2 and up* The Graphics Tablet 

software will not operate under previous versions of DOS or in an 
Apple Pascal environment ■ 



It is helpful (but not m'tifHunry) to have read the following manuals: 

(product number A2L001B) 



1) The Applesolt Tutor Ul 
Welcome and Chapter I 



2) Do's and Dent's of DOS (product number A2L0012) 

Preface through Chapter 2 

If you are using the Apple Language SyMii<«, by sure to read: 

(product number A2L0024) 



Apple Language System 
Chapter 3: Using BASIC 
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Your Graphics Tablet package contains ten items: 

1) The Graphics Tablet and its attached 

cable- 

2) The Graphics Tablet's Indicator pen and 

Its attached cable- 

3) A prlnted-clrcult board (the Graphics Tablet 

Interface card) 

4) A mylar "menu" overlay* 

5) Two "GRAPHICS TABLET SOFTWARE" diskettes - 

6) A piece of die-cut , double-sided 

foam tape. 

7) A warranty card, 
b) A packing list. 
9) This manual. 

ji'i A static cloth. 

Saw the packing material in caae you wish to transport your Tablet — 
or In the unlikely event that you must return your Tablet to your 
dealer lor service* If you did not fill out your warranty with your 
Apple dealer before you brought your Graphics Tablet home, send it in 
now -- not only does this ensure that any warranty repair your Tablet 
may need will be done as quickly as possible, but It also puts you on 
Mi* uwiUliig list for CONTACT, the Apple users' newsletter that keeps 
you Informed nl updates and new products- 



p -■ 
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PLUGGING IN 
<*- 

***** Special Note ***** 
before connecting or disconnecting 
ANYTHING 
on the Apple or 
the Graphic* Tablet 
niKN liKK THE POWKK. 
rii In 1h a must • 

ri*«»* pay apiulrtl «M*iiithm to tlilu wrillOK 4 " ?"" lr V ,u WHlllWl 

■I tl I « < nunm I aomnlh.u i i Iha Inutile ill yittll Apple when the plfWVI 

In mi, Mt*ff I* * good < limn ■# tn*l ynii v ihimn^n Urn vUu I ionh n . 
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The Graphics Tablet and its pen connect to the Interface* card, whl«h 
in turn plugs into one of the eight peripheral, connector a lot* In tiu* 
inside ot the Apple, along the back of the main board* The niftblM 

attached to the Tablet and the pen terminate in small Hoeketn, whlrli 
fit over two sets of pirn- on the Interface card* The Rocket* ;ire 
spaced and keyed so that it is very difficult to attach theta 
incorrectly* 



<* 



nandle the Interface card as you would handle a high-quality, 
expensive phonograph record* Grasp it only by the corners or edges, 
and try not to touch the delicate components or pins. Don't grasp the 
card by the gold "fingers" — they are the medium through which the 

Apple communicates to the Tablet and their efficiency is decreased if 
they are dirty or scratched* The Interface is a precision instrument 
and should be treated with care* 




first attach the Tablet'** pon to the Interface card- Place the 
Interface card on a t hit surface with the components face up and the 
& ola "fingers" nearest you. Take the connector at the end of the 
caole from the Tablet's pen. Notice that the four tiny round holes on 
tae bottom of the connector are keyed to correspond to the set of four 
pins in the upper right corner ot the Interface card. Gently slide 
this connector over the set of pins* There should be some space 
between the card and the connector* The finished connection should 
look liKe this: 
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How attach the Graphics Tablet to the Interface card- Take the 

Loimeetor at the end of the cable from the Graphics Tablet* Gently 
all ilt* the connector over the set of pins near the top middle of the 
Inti-rtace card* When the connector is properly attached there should 
ue -tome space between it and the card* The finished connection should 
look like this: 




INSTALLING THE INTERFACE 

To install the Graphics Tablet Interface card (which you have already 
connected to the Tablet and its pen) into the Apple, you will simply 
plug the Interface card into the back of the computer* 



as follows: 



1. Turn off the power switch at the back left corner of the Apple* 
Tnis is important to prevent daoage to the computer* Don't unplug the 
Apple, just turn it off* If you unplug your Apple, you Isolate it 
troia the common earth ground and your Apple and Tablet Interface card 
could be in danger from static discharges* 



Zt Remove the cover from the Apple 
back edge of your Apple's lid until 
then slide the lid back and im it 



Do this by pulling up on the 
the corner fasteners pop apart, 
off. 



J. Before proceeding* touch your hand to the metal power supply case 
inside your Apple* This will remove any stray static charges from 
your hands, so you do not damage the static-sensitive components on 
the Interface curd* 

4. Inside the Apple, across the rear of the main green board, are 
el&ht lony, narrow sockets called Peripheral Connectors, or "slots"* 
The leftmost slot (looking from the keyboard end) is called "Slot #0" 
and the rightmost is called "Slot *7"* The Interface card will 
operate in any slot except #0, but it is customary for the Tablet to 

utto Slot #5, the third one from the right* 

t>* Grasp the upper corners of the card between the thumbs and 
I ore! infers of both hands. Insert the gold "fingers" of the interims 
card into the chosen slot in the back of the Apple, rear edge flrsi. 
t-wntly push the tront edge of the card down until it is level mid 
I iruly seated* 



6* Take the two cables which you have connected to the Interlace 

card* On the cable attached to the pen there Is a black plastic 
titting* This Is called a strain relief. There is a hole running 
lengthwise along the bottom of the strain relief, with a slit cunning 
the length of the hole* Pry the slit open with your fingernail and 
slide the cable from the Tablet through the slit and into the hole* 

The finished strain relief should look like this: 



± 










wow take the strain re 11*1 with its "tail" on top and pointing out the 
Dack ol the Apple and slide it into the leftmost of the two smaller 
vertical notches In the back of the Apple's case* Slide it down to 
the bottom ol the notch. It should be a tight fit. If it doesn't 
slide all the way down the first tine* pull it out and slide it back 
in again. The pleatlc in pliable enough so that it will conform to 
the slot's width at Lor about three or four insertions. 








ar -i 

E 4 



7* Snap tne top back onto your Apple* Place the Tablet on a flat 
surface near your Apple* close enough so ihat the pen can easily 
reach all parts of the Tablet surface- Make sure that your disk 
drive and video monitor are connected properly* 
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BACKING UP THE DISKETTE 

Now that your Graphics Tablet is all hooked up, it's a good time to 

think about an important rule of thumb- "What rule?" you might ask* 
The rule is this: Always keep at least one backup copy of any diskette 
whose information you wish to keep. 

The value of a backup copy cannot be overemphasized* Right now* if 
you were to drop both your Graphics Tablet Software diskettes, and 
your pet turtle started nibbling on them* or somebody mistook them for 
square* black Frizbees* or some other catastrophic event occurred 
which would render them both unreadable* then your Graphics Tablet 
would be almost useless- Honest* You'd iiave to write all new 

programs yourself, or buy another Graphics Tablet Software diskette. 
in order to use your Tablet. 

Take a look at the two Graphics Tablet Software diskettes that came 

witn your Graphics Tablet* Notice that one of them has a small piece 

of silver tape over the rectangular notch on its edge* This piece of 

tape is called a write-protect tab* The write-protect tab tells the 

Apple not to store any more information on the diskette in question* 

The tab assures that none of the information on the diskette will be 

accidentally written over. Store this write-protected diskette in a 
safe place, and use it as your backup copy. 

Fortunately, you know better than to leave your Graphics Tablet 
diskettes lyln& around where they might be damaged by heat, your pet 
turtle, or strong lua^netic fields. However, you may want to be really 
careful and keep two backup copies instead of Just one* Keeping more 
than one oackup copy insures that your programs will be safe even if 
one of your backups is accidentally destroyed. If you don't know how 
to go about maKlng copies of the Graphics Tablet Software diskette, 
see Appendix a in this oamial for instructions- 



e 



Don't put your Graphics Tablet Soliwme diskettes, or any other 
diskettes, on top ol the Tablet Kuril I Its wignel Ic livid will wipe 
out any Informal Ion on the diskelleu. 



STARTING UP 



Alter you've reassembled your Apple and Its peripherals and everything 
is in order, place your Graphics Tablet Sol t ware dlHkette Into Drive 
I. Remember to use the one that does not have the silver write- 
protect tab over the rectan^u l.ir notch on its edge* Now turn the 
power on and "boot" the diskette. (If you don't understand what this 
weans, STOP! Don't kick your diskette, but read the section called 
QUOTING DOS in Ghapter 2 of your DOS manual, or Chapter 3 in the 



Language System Manual if you have an Apple Language System*) The disk 
drive will whirr and click for about 15 seconds, then the Graphics 

Tablet logo will be displayed: 




To Degin your em ouiitei with the Tablet, press Che %2m ■-* /• The 
screen will uispi.iy the Graphics Tablet "HELLO Menu", which is a list 
ot things you can do with your Graphics Tablet Software diskette* 
You'll be using Liu- HKHU ALIGNMENT program first. 



THE MENU OVERLAY 



Included in your (.ruphlrrt Tablet package is a mylar overlay called the 
"Graphics Tablet Hemi", You will be placing this overlay in the 
center ot the reeemied area on the Tablet- The overlay divides the 
surface ot the Taolot Into different areas, and each area has a 
different meaning* Hurt oi the overlay represents the Apple's high- 
resolution graphics Mt-rtUMi, nui another part lets you select which 
functions ot the Tablet you wmit to use- 
Once you attach this overlay lo thr Tablet* you need to tell the 
Apple the exact location ol Hie overlay on the surface of the Tablet, 
and tne Apple will help you nuke miri* that you've put the overlay on 
correctly* 



ALIGNING THE MENU 



before you use tne Tablet, you must Mini place the overlay on the 



Tablet and align it- There is a 

assist yuu in aligning your menu 
Tablet HELLO menu, press Q to 

then press 



program on your diskette which will 

overlay properly* From the Graphics 
select thr MKNll ALIGNMENT program, and 



The alignment program tells you what slot your Interlace card is 
plumed into and then creates an information file on your diskette. 
The name of this file Is TAfi. INfUKtiATION . All other programs which 
use the Tablet can read the vital information about your Tablet and 

menu from this file. After you run the MENU ALIGNMENT program once, 
you need not run it again, unless you remove your menu overlay from 
the Tablet or use your Tablet with a different pen. 
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Hie MENU ALlGrtHENT program will guide you in attaching and aligning 
the menu overlay- All you need to do is read its instructions 

carefully* and do Just as it requests- it the menu ever comes loose 
trow the Tablet during the alignment process, press the [ESC] Key to 
re-start the whole procedure* 

You'll be using four small circles of thin double-sticky foam tape, 
Included with your Tablet, to attach the menu to the Tablet surface- 
btlck a small circle of tape directly under the target circle in the 
upper- left corner of the menu overlay, and place the overlay in the 
center of the recessed area of the Tablet. Stick the overlay to the 

Tablet surface- 
Use the Graphics Tablet's pen to point to the small circle in the 

upper-left hand corner of the command box labelled RESET* Hold the 
pen perpendicular to the surface* and carefully press straight down 
until the point retracts into the pen, making sure that the point of 
the pen does not slip out of the circle- 




Now take the pen and point to 
corner ot the overlay* nold t 
Apple will now determine wheth 
If it is straight, the screen 
proceed- If the overlay in ct 
the bottom edge oi the overlay 
just a little In the proper di 
the screen displays "ALIGNED". 

remaining three target circles 
surface- Vou may want to pres 
KUrt it to make sure you didn't 
were taping down the corners* 



the small circle at the lower-left 
he pen straight and press down. The 
er the overlay is straight or crooked- 
will display "ALIGNKU" and you can 
ooki+il, the program will ask you to swing 

a Utile to one side. Hove the overlay 
re* lion ami try agjiln* Continue until 
I 1 J Alio c I re 1*'^ i*l tape under the 

a nd m lik them I irmly to the Tablet 
Frr-y . ram and I hen re- 

ace I dent ally move the overlay when you 



how tollow the arrows displayed on tht) 0c rutin and press the pen down 

In each small circle in all tour cornerb ol the overlay- be very 

careful! Make sure that you're holding the pen straight up-and-down, 
and that the point of the pen does not stray outride of the 

target- If you do it correctly, you will l*e rewarded with the 

message 
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CREATING ThELEI lUFOPMhTIOH FILE 



it you get any other message, you probably slipped somewhere* or the 
overlay isn't centered on the Tablet surface. Try it again- 

Once the overlay is alien ed, the Apple will return you to the Graphics 
fa Diet Logo. Press fB?l Co get to the program menu again. Now you 
can start using your Graphics Tablet. 

(If you want to oe really sure that your menu is properly aligned, 
you can run the MENU ALIGNMENT program again- Leave the menu taped 
down and Just poke the proper points with the pen. If everything goes 
well, then your menu is well-aligned. If not p repeat the MENU 
rtLlGw^ENT procedure.) 
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GET READY 



To start using the Graphics Tablet, go to the Graphics Tablet logo, 
either by re-booting the diskette, completing Che MENU ALIGNMENT 
prograo, or typing 

RUN HELLO 



Press C2I- U -elect GRAPHICS TABLET bUFTWARE and 

J2E8 ' :u ' disk will whirr and chug for .i while, and the 
Hpple will present you with a blank screen- (If you get a message 
Informing you that the Tablet Information file does not exist, press 
IRETURiN] and run the MENU ALIGNMENT program, ) In about three seconds, 
your Tablet will be ready to use* 



DRAWING 



Touch the point of the Tablet's pen lightly to the surface of the 

Tablet. Hove the pen around* You should see a small "crosshairs" 
cursor raving around the screen as you slide the pen around* The 
crosshairs are a locator, and the position and motions o£ the 
crosshairs on the screen correspond to the position and motions of the 
pen on the Tablet* Now press down on the pen so that the point 
retracts, and start drawing* As you draw on the Tablet, the path you 
trace will show up on the screen as a thin white line. 




The top and sides of the working an-a nl the overlay (the area with 

the fine mesh grldwork) correspond lu tin* lop and two sides of the 
Apple's screen- However, Hit* working itrea .m the overlay Is slightly 
taller than the screen* To compensate tor this difference in height, 
only the upper 2/3 of the overlay's working area Is "mapped onto" the 
screen. The rest, about 2-^ inches (6.35 cm) at the bottom of the 
working area. Is not usually active. (For information on how to use 






tho full working area, see the 

I i Mil the lower boundary of the 
lipped pen on the overlay* 



WINDOW coranand.) You 
working area and mark 



might want to 
it with a felt 



Jb-ft 


4 


p 


a 


p 


* 


E 


* 


s? 


* 


£ 


at 


v?m, 


£j 


•i 


• * 


* 


« 


J 


■• 



THE MENU 

Along the top of the Tablet's Mylar overlay are two rows of 22 
squares. Each square In the top row carries the name of a certain 
roinand or function which the Tablet software can perform. These two 
rows of squares are called the Tablet Menu. They let you order 
tuiictions for the Tablet as you would order food in a restaurant In a 
foreign country: by pointing to what you want* If you could speak the 
proper language* you would order dinner by telling the waiter what you 
would like, but the Tablet's Unguag« consists ol thousands eri 
Magnetic and electrical Impulses traveling near the speed of light- 
Hoiit people can't communicate In this fashion (those who can are 
Mutant*, and thus have gone far In the computer world), so you'll have 
to Indicate your choices to the Tablet by pointing « the Menu. 

To invoke a command or function, touch the point of the Tablet's pen 
anywhere Inside the corresponding square and presa down. Hold the pen 
down until you hear the Apple beep. If you don't hear a beep, then 
you haven't fully activated the command, and you should lift the pen 
and try again* 

The second row of boxes, which carry no name, consequently have no 

function* You can use them for your own programs (see EXTENDING THE 
NKMU In Chapter 3). 

Tlw following pages describe each command and its function- To help 
you locate the square for each command, the section describing that 

command will be headed with a drawing of the menu and a pen pointing 
to the proper square* 
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Yiiw DKLTA (unction lets you adjust the precision with which the pen 
druwii on the screen* The Apple subdivides the working area 01 tilt* 
Tablet Into *J,/6U small dots, each one corresponding to one dot *»u 
(he Apple'** mreun. As you move the pen aromi.l flu* HurUre »l tfiu 
Tablet , the Applf- draws lines between the dot** yuu travfrtt*. Til* 
DKLTA petting !*«<* you control the distance llu< pan cmi *>ve Ih>i.m<> 
tin* Apple drawH a lino to the new dot* Tin- nutttlttftt p0*«|fale itnu 
li Thin wtfcltiK will whv Mid Apple draw ♦• imw lino *-*n h ll»*> v-m 
wove tin* pen a vertical .»r hnrUom.il dlil | ,, m , .|.*i (mi ih* 
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Tablet, about .039 inches or 0.997 mm) from the last Jot plotted, The 

normal value for UELTA is 2. The largest DELTA value Is 127. This 
will make the Tablet draw a new line only after the pen has roved a 
horizontal or vertical distance of 127 dots (4.98 inches* or 12.6 cut) 
frota the last dot plotted* 

Associated with the DELTA setting is the Audio Feedback feature. When 
this feature is turned on, the Apple's speaker will emit a click each 
time the Apple draws a new line. With the Audio Feedback feature 
enabled, you can actually hear as well as see the effects of different 
DELTA settings. 

To look at or change the current DELTA setting, touch the pen to the 
DELTA command square* Press it down until you hear the Apple beep. 
You'll see the following: 



FA^T-DRAH DELTA SETTING 



CURRENT DELTA SETTING IS 2 
AUDIO FEEDBACK IS OFF 



NEW DELTA EQUALS 



The first few lines cell you the current i>i.i.ia setting and whether the 
Audio Feedback feature is ON or OH!* Tin- Apple will ask you for the 
new D ELTA val ue. If you wish to rcliiln the current DELTA v.ilur-, Just 
: '■••■ | fc dfaiU • It not, iy\><- a number between I and 127 and press 
PiU'-;B • Next, you'll be asked whether you want cue Audio Feedback 
ON or iFF. Ag ain, 11 you wish to retain the current setting, just 

press ^^^^|. otherwise, type l lie word UN (to produce the clicks) 

or OFF (to silence the cllckn) ,iu-l 1 ■ ^^2J . The Apple will 

then return you to the picture you were drawing, with the new DELTA 
and Audio Feedback settings In effect' 

Experiment a little with different DELTA settings- Set a cup or 
saucer on the Tablet surface and trac<l Its perimeter several times, 
using different values for DELTA each time. You'll get something 
which looks like this: 
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Turn the Audio Feedback ON and OFF, 



and use 
buzz as 



It at different DELTA 
you move the pen around; 



settings- At low settings, it will 

at hi b her settings, you'll be able to detect distinct clicks- 



THE COLOR MENU 
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The Apple's screen can display six colors: black, white, green, 
Violet, orange, and blue (of course, If you are using a black-and- 
white monitor, you'll see only various shades of grey). The Apple 
Irnin you draw on the screen with all of these colors* 



as down* The 



Touch the pen to the command box marked PEW COLOR and pre 
Apple will beep, the screen will clear and the message 

UWSTKUCTiNC COLOR MENU 



Will appear at the bottom of the screen- The Apple will proceed to 
draw eight colored boxes, surrounded by a grey border* 

Novo the pen lightly across the surface of the Tablet* You'll see a 
ftifttill block drifting around the screen (instead of the usual 
UOMhftlft)* Use the pen to position the block over the color with 
which yon wish to draw, and press down- The color menu will vanish, 
and you will be looking at the screen on which you were previously 
drawing. Now, drawl The lines you draw will be in the color you 
Htfltn iad. Uitinge colors again and keep drawing- All the rules -in- 
Hip #m»*'. Only Che colors have been changed. 



ir , whl 



l* you're AhOpping around for a new INiN IjDLijK, you dor Id* f<H\ 

dmi'l Will tO cttftttgC tit* color you'v<- got, JiiHt prerm 
I Your l*KN COLOK will trot be changed* 
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SOME BACKGROUND INFORMATION 
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When you start drawing with the Graphics Tablet, you're given a black 
screen on which to create- You can tell the tablet that you wish to 
use a different-colored background by pressing the pen In the BG 

COLOR (Background COLOK) square* The Apple will present you with a 
color menu (as for the PbH COLOK command)- Pick the color you want to 
use as a background; for instance, orange- The menu will vanish and 

the screen will instantly be filled with orange, or whatever color you 
have chosen. 
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Using the i*C COLOR couoand will erase everything you had on the 
screen, so If you want to specify a BackGround COLOR, do it before you 
start to dr.iw. 

Are you trying the examples? Is the BackGround COLOR conmand working? 
Is orangi? your lavorite color? Again, if you decide not to change the 
background COLOR, just pre-. UtilUMM instead of selecting a color. 
Your BackGround COLOR (md your picture, too) will be left unchanged- 



A BRIEF DIGRESSION ON 
HIGH-RESOLUTION GRAPHICS 



i>y now you must have noticed Hint 
with the colors- Kor uxildhilCp su 
try to DRAW blue lines acrosr* it* 
violet, and draw some blm* Lffldtf* 
The color "shadows" and the "zehr 
television set, or the strange dl 

consistency you observe on a blac 
of the Apple's method of gene rati 
graphics display* For aiore infor 
Apple's nigh-resolution graphics 
Appendix C* 



there are some funny things going on 
t the HackGround COLOR to green and 
Or set the BackGround COLOR to 
Obviously there's something wrong, 
i tttrlpeu" which you see on a color 
fttoft Ions, unevenness, and lack of 

k-nud-white monitor, are the results 
ng color* Lu its high-resolution 
[nation on thr anomalies of tin* 
color uenorttttoD scheme, see 






GUIDELINES 

To nilnI»Ue the problems created by the Apple's hjgh-resolutlon 
gmphirH color scheme, follow these guidelines: 

I) Most Inconsistencies of the Graphics Tablet colors occur with 
vertical lines. Use horizontal lines when possible. 

I) tfhon you're drawing with black or white on a colored 

background, or in color on a black or white background, draw 
the lines a little thicker than nornal by going over them 
twice. This takes care of the broken lines you may get- 

i) If you need to place two colored blocks next to each other, 
stack them vertically, not horizontally. This cures the 
colored shadows that sometimes appear between colors. 
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Si* i.mi li for the digression, on with the Tablet- 



A CLEAR ALTERNATIVE 
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If you're tired of the scribbles and doodles on your screen, press the 
pan to the CLEAR square* Zap! Your whole screen will be restored to 
tha background COLOR (see the previous section). Draw mode will be 
Matured, and, i£ you haven't set one, the BackGround COLOR will be 
black. 

If you have set a VIEWPORT (described a little further on in this 
I'ha-ili-r), then CLEAR wtll aff«CC Only the portion of tin* scrcm i:isii,. 
Hi. VXKWPORT* The rest of the screen will remain unchanged. 



18 



£ 3 

P 51 

* -I 

£ -J 



v/ 



LINE UP 



*u 



uws 



OOTS 



FRAMl 



BOX I CATALOG! LOAD 



AVI 



SEPARATE 



sum 



I'l UNI I 



So far, you've been happily drawing somewhat rou^h, freehand Uih»h on 
the Apple's screen. If you wanted to draw a straight line between two 
points, you probably tried to draw it with a straightedge (smart, hut 
awkward) or did it freehand (sloppy). "Is there a better way to dr.iw 

straight lines?!", 1 hear you cry- Well, guess whatl Yes, there's a 
better way to draw straight lines- Press the pen to the box which, 
for soue obscure reason, bears Che designation LINKS. Now you haw 

entered LINKS mode. You will reiaaln in LINES mode until you tell the 
Apple otherwise* We'll tell you how to do that later. 

meanwhile, since you're in LINES mode, let's draw some lines. Press 
the pen down anywhere on the Tablet's working area and lift the pen 
again. See the small dot left on the screen? That will be one 

endpolnt of your line- Now press the pen down at another point in the 
working area. Zap! There's now a straight line connecting the two 
points. Press the pen down again at another point, and the Apple will 

draw another line, this one connecting the new point and the second 
point* Now rush to your nearest toy store and buy a Connect-the-Dots 
coloring book. Pick out an interesting page, tape it to your Tablet, 

and start connecting dots* The figure will magically appear on your 
screen* 

If you want to start a second LINES figure* simply press the pen to 
the LINES command box again. The next point at which you press the 
pen will be the beginning of a new figure* 



At 



The straight lines you draw with your Tablet may not seem absolutely 
straight to you* This is normal. Lines that are neither horizontal 
nor vertical are actually made up of tiny zig-zags between dots on the 



screen- 



Once you enter LINES mode, you'll stay in LINES mode until you ask to 
leave. The proper way Co ask to be excused is to press the pen to a 
box that represents another drawing mode* 



DRAW 




* * 
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The mode you were in before you entered LINES mode is called DRAW 
mode. DRAW mode is the normal state of the Graphics Tablet and is 

automatically put into effect when you choose the Graphics Tablet 
Software from the diskette menu- This means that DRAW mode is the 
default mode. 

Whenever you wish to leave a fancy drawing mode (LINES, BOX, FRAMK or 
DOTS), simply press the pen to the command square called DRAW. Your 

picture will be left intact and you will be able to draw normally 
until you specify another mode. 



YES, SIR, DOT'S MY BABY 




Once you've got a picture on the screen, you might want to edit or 
change small portions of it- For example, you've drawn this picture: 




and you want to fix up the little "glitches" around the edge* Thar* 

are a couple of ways to do this: you could set the PEN COLOR to Mark 

and DRAW the glitches out, you could erase whole portions of tlu> 
screen and redraw them, or you could simply erase the whole tiling and 

start over. Fortunately, there's an easier way. Press the pen in lh«< 

square marked DOTS* You are now in DOTS mode, and wilt remain in HUTS 

mode until you specify another. While you are drawing with DOTS, tin* 
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Graphics Tablet will let you plot individual points on the screen* 

Each time you press the pen down in the working area you will plot 

one* and only one, point on the screen- When you lift the pen up 

again and press it down in a new place, you will plot another ulAgte 

dot- The dots will be of the color you specified In the moat recent 
PbN COLOR couuand, or white if you have not selected any other color. 

By setting the PEN COLOR to the Background COLOR (normally black) , 
setting DOTS node, centering the crosshair* on the extraneous ulitchea 



in the picture, and exorcising them one by 
picture like the previous one into this: 



one 



you can turn a rough 




UUTS mode is also handy for adding shading and texture to your 
pictures* DOTS mode is most useful when used with VIEWPORT and 
RHDUCEK, described later in this chapter. 

To leave DOTS mode, press the pen in the command square for any other 
loode (like DRAW, LINES, BOX or FRAME). 



THE BIG FRAME-UP 




BOX [CATALOG LOAD 



SAVt (SEPARATE! SHOE 



A BE A [DISTANCE 



tfhen you're in the KKAfiti mode you can draw open rectangular boxes on 
the screen by specifying two diagonally opposite corner points* To 

enter FRAME mode, press the pen down in the (suprise!) FRAME command 
box* Now press the pen down anywhere on the Tablet's working area and 
lift it 'i. Mn. A single dot will appear on your screen* Take the 
pen and press it down at another point on the working area* The Apple 
will draw an open rectangle with opposite corners at the points you 
specified* Pick another point and press the pen down- Notice that 
the FRAME mode doesn't draw a fram<* with the new point and previous 
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point (as LINE mode would draw a line between them)* but instead uses 
the new point as a corner of a separate FRAME* Pick and press a 
■f- J ~V lourth point to complete the second FRAME* 



** 



Your FkAMbs can be simple, or you can use many FRAMEs to make a 
larger » more complicated FRAME; 




P 4 



You can draw your FRAMEs in different colors, too. The FRAMEs will be 

drawn in the current PEN COLOR, or white if you haven't selected any 
other color. Beware! Colored FRAMEs way come out with a side or two 
nisslng because of the nature of the Apple's high-resolution graphics 
screen (see Appendix C)« If this happens, re-draw the FRAME, but move 



the corner points very slightly to one side* 



to leave 
(such as 



FRAME 
DRAW, 



mode, 
LINES 



press the 
, DOTS, or 



pen in 
BOX). 



the square for any other mode 



LITTLE BOXES 
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There's a white 
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blue one, 



And a green one, and an orange one 
And tney're all wide 
On the Graphics Tablet 
And they all Look 

Just the same. 



Now KKArtKs are nice, but they're kind of trap Id* You might even go so 
(ar as to say they're eapty. 11 you're looking for something a little 
more, well, fulfilling than au ordinary rectangular ijuadri Lateral, 
then the BOX mode Is for you* Press the pen down In the square narked 

tiOX. Now press the pen down at two poLnts on the working area, as you 
did for iKA.'n,. The Tablet software will give you solid indication 
that the task is completed b Y drawing a uniform, monolithic box with 
corner** at the two points you specified* 



" 
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You will remain BOXed Into this node until you free yourself by 
pressing the pen down in one of the squares narked DRAW, LINES, DOTS, 
or FRAME. The BOXes you draw will be of the current PEN COLOR. If 
you have not specified a different color, your boxes will be white. 



SAVING PICTURES FOR POSTERITY 




By now you should have generated some beautiful (well, at least 
interesting) artwork. It's a shame that you have to erase it, isn't 
it? Well, you can save the entire picture for later recovery and 

further work by pressing the pen in the square narked SAVE. Your 
picture will vanish (temporarily) and the screen will display the 



TYPE A NAME FOR THIS PICTURE. 
— > 

A picture name can be from 1 to 26 characters long, and may include 
letters, numbers, and special diameters (except the comma). Unlike 
normal diskette file names, picture names do not need to begin with a 
letter; you can have picture names such as 

1 FOR THE ROAD 



or 



«SPACE» 



(notice the spaces before the name) 
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The reason for this is that before the Apple saves the screen onto the 
diskette, It adds the prefix "PIC." to your picture name to identify 
it as a bona fide Graphics Tablet Picture* Since diskette file names 
will always begin with the letter P (in PIC-), your picture names can 
begin with whatever you please- 

The PIC. flag also implies that the picture file includes the Tablet 
WINDOW setting (see the WINDOW conmand). Files which do not contain 
this information should not carry the PIC* flag. 



After you type the name of the picture, ^ress'^^^^B* I£ y° u decide 
you don't really want to save the picture yet, just press E2EB 
without typing any name- Your picture will reappear, and you'll be 
left in DRAW mode- 

If you do choose to save your picture, the Apple will then ask you: 



DRIVE! — > 



(DEPAULT-1) 



The Apple will save your picture onto the diskette In the disk drive 
you indicate. The DEFAULT drive Is the drive which the Apple thinks 
you'll want to use, drive 1 the first time and the drive specified 
previously eac h time thereafter. Type the drive number you wish to 
use and press K^^S i or Just press ^idtMB to select the DEFAULT 

drive. (If you try to specify any drive number other than I or 2, the 
Apple will use the default drive). The drive will whirr and chug for 
a moment, then your freshly saved picture will reappear, in DRAW mode 
with PEN COLOR as it was when you left* 

If there is already a picture on the selected diskette with the name 
you specified, the Apple will display the message 

A PICTURE ALREADY EXISTS WITH THAT NAME. 

CONTINUE (Y OR N) 

If you wish to overwrite the current picture which has the name you 
specified, press Q B2EB - II you don' t want to destroy the 
picture on the diskette, pres Q EQZd i[ul repeat the SAVE 
operation usin^ a different picture name (a lone | | is accepted 

as an Q ^^^^9 response). 

If you complete the SAVE procedure, or If your attempt to SAVE a 
picture is foiled, and you get an error message from the Apple, you 
will lose any VIEWPORT you may have set (s«c the VIEWPORT command). 
If, however, you have aborted the SAVE connmnd with an Q 
the VIEWPORT will remain intact* 
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li you receive this message: 



THE FUTURE IS LOCKED. OR 
THE DISK IS FULL, OR PROTECTED 



PRESS SPACE BAR TO RETRY 
PRESS <CR> TO ABORT 



then any number of things could be wrong: the diskette is full and can 
hold no more pictures, the diskette is write-protected, or there's 
another picture on the diskette with the same naae and the file which 
holds that picture is locked- In the first case, simply use another 
uninitialized diskette. In the second case, remove the diskette, peel 
off the write protect tab and reinsert the diskette* In the third 
case, try another file name* Whatever the problem is, you may press 

the space bar to a ttempt to SAVE the picture again under the same name, 
or pres ■■- If -■ cancel the attempted SAVE- Your picture will 

reappear, and you will be back in DRAW mode* 
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If you filled up the diskette by trying to SAVE a picture, only part 

of the picture will actually be stored on the diskette* It is best 

to delete the partial file from the 1 diskette after you have SAVEd the 
picture on another diskette (see GETTING OUT). 

If you receive this message: 









mm. 



uninitialized, or the data on it has been destroyed* You could have a 
faulty disk drive or controller card, or your drive is under the 
Influence of a powerful magnetic field (did you put it on top of your 
television? Naughty, naughty). There may be no diskette in the drive, 
or you left the drive door open, or the diskette is crimped and Is not 
rotating- Whate ver the cause, press the spacebar to attempt the SAVE 
again, 01 press EBBM to *et back to your picture. Investigate- 



BROWSING THROUGH THE CATALOG 
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You can look at the contents of your diskette by pressing the pen in 
the square marked CATALOG. The Apple will ask you <as abov e) for th e 
drive number. You can select the DEFAULT drive by pressing ■idiUfeB * 

The message 

PRESS SPACE BAR TO CONTINUE 

will be centered at the top of the screen. The drive will whirr a 
bit, and the names of all files on the diskette will be presented* 
Don't press the spacebar yetl The file names which begin In PIC. are 
your Graphics Tablet pictures, and should all have the annotation 
b 033 to the left of them. Incidentally, the B denotes that they're 
BINARY files, and the 033 means that they use 33 diskette sectors, or 
a little over 8K bytes of memory, each. If you see any PIC. files 
which aren't marked B 033, then they're not complete pictures. Change 

their names (see GETTING OUT) so you don't mistake then for Graphics 
Tablet pictures in the future- 

If you order a CATALOG of the Graphics Tablet Software diskette, these 
IIUm will be included: 



I/O ERROR 



PRESS SPACE BAR TO RETRY 
PRESS <CR> TO ABORT 



while attempting to SAVE a picture, then there are problems. Maybe 
you specified Drive 2 when you only have one drive, or the diskette is 
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PMSS SPACE BAR TO CONTINUE 
DMK UOLUM 234 

(JWHUV TABLET LOGO 
,. h[mli i«t lUJHEHT 

anfillU* TA&LET SOFTWARE 

X. m V ftfcrtll 

MAI ION 



The** *r» all QMpOMflt programs of the Graphics Tablet package. The 

only mUfcU Him U Cb« tJKAI'HICS TABLET LOGO* which you'll notice has 
lh« miH*iIi»ii H OH to ilt«» l-*It of it. (The 034 means that it's 
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slightly larger than normal Tablet pictures* which are labeled B033- 

This causes no problems* however.) This is the picture of the Graphics 
Tablet Logo frame* which you see when you boot the diskette* You can 
LOAD this picture and work on it* even though it's not a PIC- file 
(see LOAD* below* for details)* 

CATALOG can fall victim Co the same I/O ERROR problems as noted in 
SAVE* See the previous section for details* 

If the CATAUJG listing is too long for the screen, the listing will 
pause after displaying 18 files- Press the spacebar to get the rest 
of the CATALOG* 

When you've finished looking at the CATALOG* just press the spacebar. 
Your picture will instantly reappear on the screen* with PEN COLOR 
unchanged* 



GETTING LOADED 




t.ATAHUll LQAD 



SAVE IStPARATEl SLIDt 



ARIA I DISTANCE! 



Once you have SAVKd ■ picture on diskette, you can call it back to 
your screen to b*j worked on some more* or Just bring it out so you can 
admire it for a minute* Press Che pen to the square narked LOAD* 
The following words will appear: 



PLEASE TYPE THL PICTUKK NArth- 



U you c hange your mind and don't want to LOAD a new picture* press 
^^^^ . Your previous picture will reappear* and you will be left 
in DRAW mode with the same PEN COLOR as when you left* 

if you do want to LOAD another picture* type the name of the picture 

which you wish to see, and press E1Q39 * You don't have to type the 
PIC** the Apple will supply that for you- The rules for naming 
pictures are the same as described in the SAVE command. 

You will then be asked to spe cify whi ch drive the diskette with the 
chosen picture is in. Press Kgffll : <> Indicate thai It's In the 
DEFAULT drive* or type the drive number (1 or 2) and press J^HJB * 

The disk drive will spin for a few cuonents* then the selected picture 
will appear on the screen* You will be left In DKAW node* 

LOAD is vulnerable to the same disk I/O ERROR problems as were 
described in the SAVE section. 
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You can LOAD picture flies which were not created by the SAVE command, 
as long as they carry the notation B 034 in their CATALOG listing* One 
such file is the GRAPHICS TABLET LOGO file on your Graphics Tablet 
Software diskette- Even though this file doesn't have the PIC* flag 
in front of its name* it can be LOADed and worked upon like any other 
picture* If you LOAD this file* and SAVE it again* the new version 
will have the prefix PIC. attached to the name, and will have the 
notation B033 to its left in the CATALOG. 

When the Apple sees the PIC. prefix* it infers that the file contains 
Information about the Tablet WINDOW setting along with the picture. 
The absence of the PIC. flag indicates to the Apple that it should use 
the default WINDOW setting (see the WINDOW command)* In addition* if 
you have a picture on the diskette whose file name does have the PIC. 
prefix* you can make the Apple ignore the Tablet WINDOW setting in 
that file by typing the PIC. prefix at the beginning of the file name 
when you LOAD it* 
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If you LOAD a picture which was SAVEd on another Apple or Graphics 
Tablet* it's possible that the Tablet which created that picture uses 
a slightly different WINDOW setting than yours. The difference 
usually appears as a discrepancy between the notions of the pen across 
the working area and of the crosshairs on the screen- If the 
crosshairs don't correspond to the pen position* then re^LOAD the 
picture* but type the PIC* prefix at the beginning of the file name* 
This will make the Apple use the proper WINDOW setting for your 
Tablet. 

With one exception* an attempt to LOAD a picture* whether successful 
or not* will remove any VIEWPORT you may have set (see the VIEWPORT 
comma nd). If you have aborted the attempted LOAD with a O 

i d J3^^B - f:ii:; nilt " does no! apply. 



GETTING OUT 



With the Graphics Tablet* you can perform three simple operations with 
disk files: SAVE* CATALOG* and LOAD. In order to RENAME or DELETE 
picture files, you'll have to leave the Graphics Tablet Software and 
get back to the Appl esoft /DOS command level. To do this* get to 
URAU mode and press ^^J • The Apple will ask you if you Indeed wish 
to Leave* 



$ 



II you answer D * you will lose whatever picture you had on the 
mreenl Any other reply wtll send you back to your artwork, in DRAN 
■Ddt* 
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11 you answer Q , then the Apple will run the HELLO program on the 
diskette, and you will aee the Graphics Tablet Logo Crane (see Chapter 
1, STARTING UP). 



Press again to get to the HELLO menu. Choose Q to QUIT and 

press E3E2M * The screen will be cleared and the Applesoft prompt 

character ()) will appear in the upper— left corner* 

Now you can DELETE, RENAME. LOCK, UNLOCK, or VERIFY any of your 
picture files on the diskette, or do almost anything else in Applesoft 
or with DOS* (For details on how to perform these operations, see 
Chapters 2 and 4 of your DOS manual*) Remember to include the PIC- at 
the beginning of the pictures* file names! To return to the Graphics 
Tablet software, type 

RUN HELLO 

When the Graphics Tablet Logo appears, press WFM , select Q : " [ " 
Graphics Tablet Software, and press K9^L9 - You'll be working with 
the Tablet again, with a blank screen, a white pen, no VIEWPORT, the 
WINDOW at its default setting, the REDUCER off, and in DRAW mode. 



DON'T try to RUN the file GRAPHICS TABLET SOFTWARE directlyl It is 

not a program in Itself, but la an EXEC file which runs several 

programs and sets up some parameters necessary for the well-being of 

the Tablet software* You should always enter the Graphics Tablet 
Software by selecting It from the HELLO menu* 



ROOM WITH A VIEWPORT 
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Am 1 to spend the rest of my short life 
Confined by these four corners, bright and 
Shall I be limited in my designs 
To draw only within this VIEWPORT small? 



sharp? 



This cannot be! And yet, there's recompense: 
The box which limits, also can protect. 
And keep me from destroying what I've wrought. 
Confine, protect; the VIEWPORT functions thus 



You can use the VIEWPORT conmand to select a rectangular area on the 
screen* Once you set an area for a VIEWPORT, you will be allowed to 
draw only within that area* This allows you to concentrate on one 
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area of the screen at a time, while protecting the rest of the picture 
from being accidentally erased or overdrawn. 

The VIEWPORT appears on the screen as four small "L"-shaped corner 



s, one at each corner of the VIEWPORT* Each leg of each "L" is 
three dots long and one dot high* The VIEWPORT itself is the area 
enclosed by these four corners (the corners are actually outside the 
VIEWPORT proper). If you change or remove a VIEWPORT, the corner 
marks vanish without a trace, leaving the screen under them unchanged. 



To specify * 
Tablet menu- 

UPPER LEFT? 



VIEWPORT, press the pen 

The prompt ins message 



to the VIEWPORT square on the 



will appear briefly at the bottom of the screen. Position the pen at 
the spot where the upper-left corner of the VIEWPORT should be 
(imagine you're drawing a FRAME) and press down* One corner mark will 

appear, and another prompting message: 

LOWER RIGHT? 

will be displayed: 




^^ _ Position the pen at the opposite (lower-right) corner of your proposed 
■E VIEWPORT, and press down- The other three corners of the viewport 

will appear. This is how the finished VIEWPORT will look: 




M 



Unlike FRAME and BOX modes* in which you can specify the corner points 
in any order, VIEWPORT really does want the second corner point to be 
below and to the right of the first- If you give the points In 
reverse order, or specify an impossible VIEWPORT (one which has no 
height or width), then you will recieve the message 




You will then be asked for both corner points again. 

Once you've set a VIEWPORT, what do you do with It? Simple, Just 
DRAW. After you specify the two corner points, and you see the four- 
cornered frame, you will be placed in DRAW mode with the PEN COLOR 
unchanged* Anything you DRAW outside of the VIEWPORT simply will not 
show up on the screen; anything you draw Inside it, will. Notice that 
the crosshairs will appear even outside the VIEWPORT, but pressing 
down on the pen has no effect. 

You can change to any other drawing mode (BOX, DOTS, LINES, or FRAME) 
and it will work normally inside the VIEWPORT. But if, while you're 
In one of these modes, you try to specify a point outside the 

VIEWPORT, you'll receive the admonition 
POIHT OUTSIDE VIEWPORT. RESPECIFY. 

Just choose another point inside the VIEWPORT. If you want to restart 

the BOX, FKAHK, or LINE you're drawing, press the pen to the square 
for the proper mode again* 

If you invoke the VIEWPORT comnuind when another VIEWPORT is already 
active, the Apple will remove the previous VIEWPORT before asking you 
to specify a new one. 

At any time after you have Invoked the VIEWPORT command, but before 
you have finished specifying a new VIEWPORT, you can tell the Apple to 
give you one of two special VIEWPORTS* One of these is the VIEWPORT 
you were using before you started to set a new one, and the other is 
the "default" VIEWPORT (the currently set WINDOW)* 
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To recover the VIEWPORT you had before you started to set a now one, 
press J3J2H before you finish the VIEWPORT command. 

To request the default VIEWPORT, press Q before you finish the 
VIEWPORT command. The default VIEWPORT is the full screen, or (if you 
have Invoked the WINDOW coraaand) the area within the WINDOW. When the 
VIEWPORT is set to the full screen, no corner marks appear* 

The VIEWPORT command always leaves you in DRAW mode with the PEN 
COLOR unchanged- 



A BRILLIANT REDUCTION 
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Once you've set a VIEWPORT, you can use the REDUCER function to shrink 

the entire Tablet working area into the VIEWPORT on the screen- This 
allows you to convert large pen motions on the Tablet into snail 
notions on the screen* This lets you make precise, small drawings- 
When you use the REDUCER in conjunction with the DOTS node, you can 
modify very small areas of a picture, setting and resetting individual 
dots if necessary. 

Once the REDUCER is enabled f it will stay in effect until you remove 
it or change the VIEWPORT. To use the REDUCER, set a VIEWPORT around 
the area in which you wish to work, then press the pen to the square 
marked REDUCER. When you hear the Apple beep, the REDUCER is active. 
If you receive the message 

NOT POSSIBLE. 

then you have specified a VIEWPORT which is too small or too 
disproportionately shaped for the REDUCER to function. Such an 
impossible reduction will leave you with the REDUCER inactive and 
everything else unchanged. 



^} 



The screen position of the VIEWPORT determines the minimum possible 
size into which you can REDUCE. You can REDUCE into smaller VIEWPORTS 

in the upper-left corner of the screen than in the lower-right 
corner. Specif lcally, the smallest possible VIEWPORT size into wli I* li 
you can REDUCE ranges from two screen dots square (at the normal 
WINDOW setting) in the upper-left corner to 45 dots square In tin* 

lower-right. 
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To disable the REDUCER, press the pen to the REDUCER square again. Tho 
Apple will beep and the REDUCER will be disabled* The RESET, SOFT 
RESET, WINDOW, VIEWPORT, and LOAD commands also disable the REDUCER. 



When the VIEWPORT is at its default setting, 
effect* 



OPENING THE WINDOW 



the REDUCER has no 




The WINDOW comand works like a VIEWPORT with the REDUCER on, but 
the other way 'round. Where VIEWPORT with REDUCER lets you draw 
something large on the Tablet, and have it appear smaller and in a 
specific place on the screen, the WINDOW lets you draw something snail 
in a specific place on the Tablet and have it appear large on the 
screen* 

You normally set a WINDOW before you begin drawing a picture. Press 
the pen to CLEAR and then to WINDOW- This will appear on the screen: 



. PRESS PEN AT 
J1114:UMl±i AND LONER-RIGHT 
CORNERS OF THE ACTIUE 
TABLET AREA DESIRED 
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PRESS PEN AT 
UPPER-LEFT AND *0![*;n:irrf!h 
CORNERS OF THE ACTIUE 
TABLET AREA DESIRED 



Press the pen to the lower-right corner- The words will disappear and 
the drawing screen will return, with a large frame in the middle of 
the screen* This frame is proportional to and corresponds with the 
frame around the molehill on the Tablet, and is centered on the 
screen* Take the pen. set DRAW mode, and trace the trolehill. You 
will make a mountain on your screen out of the molehill taped to the 
Tablet* 








Find a picture of a molehill and tape it to the Tablet's working 
area- Now take a pen or a pencil (not the Tablet's pen!) and draw a 
box around the significant part of the picture. Take the Tablet's 
pen and, following the highlighted instructions on your screen, press 
it to the upper-left corner of the box- The highlighting will shift: 



* 



i* 
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4 After it's finished, WINDOW returns you to DRAW mode, with your PEN 
COLOR unchanged and the VIEWPORT set to the same size as the WINDOW 
frame on the screen* 

The reason that you aren't shown the screen and crosshairs while you 

set the WINDOW (as you are when you set a VIEWPORT) is that you're 
selecting an area on the Tablet, not the screen* The resulting are*i 

on the screen Is as large as the Apple can make it f proportional In 



size to the WINDOW on the tablet, and centered on the screen* Sin 
the WINDOW area on the Tablet bears little relation to the screen 
before it's set. the screen and crosshairs are not displayed. 



> *■ 



- At any time after you have initiated the WINDOW command and bHun* you 
have completed it, you can use the Apple's keyboard to Indicate thai 
you want the default WINDOW, (the entire working area of the Tablel t ) 
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or thut you want to cancel the WINDOW sequence. Press 
time during the WINDOW sequence to cancel it; press Q 
default WINDOW. 



to 



at any 
select the 



BROKEN WINDOWS 

If you receive the message 

PLEASE SPECIFY POINTS CORRECTLY! 

then you've not specified the two corner points In their proper upper- 
left* lower-right order, or you've tried to set the WINDOW to an area 
on the Tablet that's too small. You will be asked to specify both 
corners again. If you want to cancel the attempted WINDOW, press 



If the Apple flashes the message 
PLEASE STAY WITHIN THE WORK-AREA. 

then you've let the pen stray outside the working area of the Tablet' 
overlay. You will be prompted again to indicate the corner point. 
To cancel the WINDOW command, press 



DRAWING IN THE WINDOW 

Once you've placed a WINDOW on the Tablet, you can use any of the 
Tablet's drawing modus (DRAW, LINES, DOTS, FKAME, or BOX) to draw, as 
long as you stay within that WINDOW. 

You can set the VIEWPORT within the WINDOW on the screen. Once you've 
set it, you can even REDUCE into it, and use the entire Tablet area 
within the VIEWPORT. When you turn the REDUCER off, you will again be 
limited to your WINDOW. 

Once you've set a WINDOW, the only way to remove the WINDOW frame is 
to set a new WINDOW or use the Tablet RESET command. No other Tablet 
coDmand will remove a WINDOW. The REDUCER will allow you to 
temporarily override the WINDOW; when you turn off the REDUCER, you 
will be left with the previous WINDOW again- Experiment with using 
WINDOW and the REDUCER; you'll be surprised at what they can do- 



When you specify a WINDOW on the Tablet, the Apple will draw the 
WINDOW frame on the screen on top of the current picture- The sides 
of the frame are two dots wide, and the top and bottom are one dot 
wide. If you set a new WINDOW, the Apple will remove the frame by 
drawing over It with the BackGround COLOR. The WINDOW coraraand can 
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therefore destroy parts of your previous picture. Also, even though 
WINDOW sets the VIEWPORT to the portion of the screen Inside the 
WINDOW frame, the CLEAR command will clear the entire screen, 
including everything outside the VIEWPORT and the WINDOW frame, and 
even the frane itself) (The frame will be redrawn after the CLEAR.) 
If you reset the VIEWPORT to a slightly smaller size than the WINDOW, 
the CLEAR command will work normally and erase only what is within the 
VIEWPORT. 

The WINDOW information is stored along with the picture information 
when you SAVE a picture onto diskette. There is no way to avoid 
saving this information. When you IOAD a picture, the Apple will 
automatically use the WINDOW setting stored with that picture, if that 
picture's diskette file name begins with PIC* If it does not, the 
Apple will use the default WINDOW setting for your Tablet. You can 
force the Apple to Ignore the WINDOW setting stored in a picture file 
in three ways: 

1) Leave the Graphics Tablet Software (see GETTING OUT) and RENAME 
the file, removing the PIC* prefix from the file name. 

— or — 



2) When you LOAD the picture, type the PIC« 
the picture name. ( LOAD PIC. filename) 



flag at the beginning of 



— or — 

3) Once you have LOADed the picture, press the pen to WINDOW and type 
Q to get the default setting. 
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The RESET command lets you (l wlpe the slate clean" and begin anew on a 
(resh picture* Namely, it: 

1) Sets the WINDOW to the the normal 11 inch wide, 6-5 inch tall 
rectangle at the top of the working area- 

2) Sets the VIEWPORT to the full screen. 

3) Sets CALIBRATE to one unit per screen dot, and leaves the uuli 
type undefined* 

4) Sets the BackGround COLOR to black, and clears the &crt-i*ii. 
b) Sets the PEN COLOR to white and sets DRAW mode. 
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b) Sets the value of DELTA to 2 and turns the Audio Feedback 
feature OFF* 

7) Sets the default drive number for LOAD, SAVE, and CATALOG to 1. 

Using the RESET command Is just like restarting the Graphics Tablet 
software all over again* 



A SOFTER RESET 




RESET CIEAR Lltoow J*^ DELTA »£ «» #& | REDUCER | J& 



«" DRAW 



The SOFT RESET command is a milder version of RESET* It lets you 
reset many of your drawing and calculating functions, while leaving 
your picture, WINDOW settings, and pen color intact. SOFT RESET; 

1) Sets the VIEWPORT to the full screen, or to the currently set 

WINDOW* This Is the same as pressing Q while setting a 
VIEWPORT. 

2) Sets the CALIBRATE unit to 1 and the unit type undefined. 

3) Sets the DELTA value to 2 and turns the Audio Feedback 
feature OFF* 

4) Sets DRAW mode. 

Hothing else is changed by SOFT RESET. The PEN COLOR, BackGround 
COLOR, the WINDOW setting, the default drive number, and so on, all 

remain the same* 
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The CALIBRATE command lets you specify a distance on the Tablet 
surface and use it for measuring vith the DISTANCE and AREA functions. 



Prens che pen to the CALIBRATE square on the menu, 
beep and the brief question: 

BEGINNING POINT? 



The Apple will 
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will appear at 
down- Another 

ENDING POINT? 



the bottom of the screen > 
brief question: 



Select a point and press 



will flash at the bottom of the screen* Select another point, say, an 
inch away from the first and press down* The screen will vanish and 
the following frame will appear: 



DISTANCE IS 26 SCREEN UNITS 



YOUff HUllEtER OF UNITS -: 



The Apple has converted the distance between the two points you 
specified into its internal "screen units"* You now have the 
opportunity to define how long that distance actually was* If you've 
Just arrived from Alpha Centaurl, and you specified a distance of 

about one U.S* inch, then that's about S gllbbets* Type 



You've now defined the length you specified to be 5 Alpha Centaurl 
glibbets. You're free to change it, of course, and give a distance of 
10 chronacs, 200 malms, or even half a greton if you so desire (use 
decimal numbers for fractions, in this case ^ Q gretons). 

The CALIBRATE command won't let you specify negative distances, or 

distances greater than 999999999* It also won't let you use a name 
for your measurement which is more than 10 letters, numbers, or 
special characters (such as asterisks, bracketts, etc-) long* 

You can tell the Apple that you'll agree to use Its internal screen 
units for measure ment by answering its questions about length and name 
with the ESSB key. Once you've specified a distance and unit name 
in the CALIBRATE command, they will remain as you set them until you: 
a) reset them with the CALIBRATE cownand, b) do a RESET or a SOFT 
KKSET, or c) change the BackGround COLOR, the VIEWPORT setting, or the 
WINDOW setting. 
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MISTAKEN CALIBRATION 

II you Hpcrlty un midpoint lor the CALIBRATE distance which 1h outaidt) 
ihn nirrvnt VIEWPORT, you will be asked to indicate the point again* 

Unr* you begin to define a distance for the CALIBRATE command, you run 
imnrol the procedure by pressing the ^^^B key. 

Don't change the REDUCER setting after you've CALIBRATED your Tablet* 

11 you do p it will shrink your measurements just as it shrunk your 
Tablet movements, and all your DISTANCE and AREA calculations will be 
incorrect- 
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Uitce you've set a distance and a unit name with the CALIBRATE command, 
you can use those definitions to calculate the DISTANCE that you move 
the pen along a path on the Tablet surface* 

For example, find a road map (we'll use one of Central California) , 
unfold it f and tape it to the Tablet so that the legend (with the 
scale of distance) is in the working area- Use the CALIBRATE command 
to set the distance and unit name to the scale of distance on the map; 




Now point the pen to the DISTANCE square and press down* The Apple 
will beep* signaling you to take the pen and trace a path on the map* 
Draw a path from Buttonwillow to Bakersfleld, along Route 5* The path 
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will appear on the screen as you draw. 
Apple will Deep again and flash 

CALCULATING*** 



When you lift the pen, the 



at the bottom of the screen, and then go away and think for a moment. 
It will soon return, telling you that the DISTANCE you traveled from 
Buttonwillow to Bakersfleld is about 25 miles. After a short delay, 
you will be returned to DRAW mode* 

The path you draw, as it appears on the screen, is just like any other 
path in DRAW mode, and it is subject to the same DELTA effects as 
DRAW. Lower DELTA settings will give you more accurate DISTANCES; 
higher DELTA settings will give you less accurate (albeit quicker) 
approximat ions - 

If you invoke the DISTANCE conmand and then decide you don't want to 
calculate a distance after all, simply press the B2J22J key instead 
of drawing a path on the Tablet. 

There is a limitation on the maximum DISTANCE your path can be. The 
longest path you can draw for DISTANCE contains 800 points. With a 
DELTA setting of 2, this is 1600 screen units, or about 59 actual 
Inches on the Tablet. Of course, this will be different if 
using the WINDOW or REDUCER functions. 



you re 
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The AREA command is a counterpart to the DISTANCE conmand* But 
Instead of letting you find the DISTANCE between Buttonwillow and 
Bakersfleld, CA, it will let you figure the AREA of Manhattan. 
Quickly remove the map of Central California and switch to one of the 
New York City area- Use the CALIBRATE coamand with the scale of 
distance on the new map* 

Now place the pen on the AREA square and press down. The Apple will 
respond with a beep. Trace the perimeter of Manhattan. As soon as 
you lift the pen, the Apple will beep again and flash 

CALCULATING*.. 

11111 *lt and think for a few moments. Soon it will return with the 

area of the Island, expressed in the units you set in the CALIBRATE 

roosund. It will hold this value on the screen for about five 
NtM'ondH, and then return you to DRAW mode. 
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Now CLEAR the screen and try it again- This time, don't go completely 
around the island, but atop about half an inch away from your starting 
point- The Apple will obligingly close the curve for you, connecting 
the ending point directly to the beglnnnlng, before it calculates the 
AREA. 

AREA is subject to the sane limitations as DISTANCE: you can only draw 
a path 800 points long* or about 59 Tablet inches with a DELTA setting 
of 2. As in DISTANCE, a larger DELTA setting will give you less 
accurate results- And if you had the REDUCER on when you CALIBRATED, 
don' t turn i t off when you are going to calculate an AREA. A press of 
the ESZ3I ke y wili abort the area command, ju^r ss tt will for the 
DISTANCE command* 

Now CLEAR the screen and find the AREA of Manhattan again. This time, 

go around the island tw i ce . Notice that even though the AREA looks 
the same on the screen, the number that the Apple will return is about 
twice the actual AREA of the figure. This is normal: if you go around 
three times, the Apple will give you a number three times too large, 
and so on. 

If, while drawing around an AREA, you move the pen outside the 
VIEWPORT, the Apple will act as if you had lifted the pen at that 
point, close the curve, and figure the AREA. 



SLIDE RULES 




Once you've got a picture on the screen, you don't have to rest at 
that. No, you can utobillze your pictures, give them some motivation, 
see some actionl Press the pen to the SLIDE square. The request 

BEGINNING POINT? 

will appear briefly at the bottom of the screen. Use the pen to 
select any point on your picture, and press down- A second request 

ENDING POINT? 

will appear. Select another point on the screen, some distance 
removed from the first. Watch your picture travel across the screen, 
both vertically and horizontally, until the first point you selected 
(on the picture) is in the vicinity of the second point (on the 
screen)* 

If you decide that a SLIDE isn't what you want right now, press 
I^^J to cancel the operation- You'll be returned to your picture, 
in DRAW mode. 
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The SLIDE operation is performed in four directions, with what 
mathematicians call "toroidal wrap-around". This ponderous phrase 
means that the picture thinks it's not on a flat screen, but wrapped 
around a doughnut: the left side is joined to the right side, and the 
top is joined to the bottom, so that everything that you SLIDE off one 

edge of the screen will reappear on the opposite edge- When your 
SLIDE is complete, you will be returned to DRAW mode- 

SLIDE moves the entire screen: there is no way to move only a portion 
of the screen- Because of the way the Apple places colors on the 
screen (see A SHORT DIGRESSION... ) f the SLIDE coranand can rove the 

picture the exact vertical distance you indicate, but can only come 
within 14 dots of the horizontal location you specify. 

SLIDE will remove the VIEWPORT and WINDOW borders before it moves the 
picture, but will replace them in their former locations (not SLID 
over) after the SLIDE is complete. 



PRISMATIC APPLE 




The SEPARATE function "strips" your picture, until only one color is 
left. Press the pen to the SEPARATE square* You will be presented 
with a color menu, just like in PEN or BackGround COLOR. REMEMBER: 
The SEPARATE comnand will destroy parts of your picture* If you want 
to preserve a picture, be sure to SAVE it before you do a SEPARATE. 
li you've already started a SEPARATE command. Just press p.mi!.l?p 
cancel it and return you to DRAW mode. 

If you do want to SEPARATE out your picture, select a color from the 
color menu with the pen and press dowu. The menu will vanish and your 
picture will reappear. Quicker than you can pronounce "refraction", 
your picture will be stripped of all colors except the one you 
selected. You will be left In DRAW mode, with your BackGround COLOR 
set to black and your PEN COLOR set to the SEPARATE color you 
specified* 



There Is no way to undo a SEPARATION. The SEPARATE 
remove any VIEWPORT or WINDOW before it performs it 



restore 
screen: 



them when 
there is 



command will 

function, and 
it's finished. SEPARATE works only on the entire 
no way to SEPARATE only a portion of the screen* 



You cannot SEPARATE out the color black. If you did, you'd be left 
with a blank screenl The Apple will deny your attempt to separate out 
either of the blacks with the 



Hi) SEPARATION ON BLACKS. 
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IN CONCLUSION 



Congratulations! If you've come this far, and practiced with your 
Tablet along the way, then you've mastered the basic functions of the 
Apple Graphics Tablet* With a little practice, you can be drawing 
and manipulating pictures with skill and ease. If you're interested 
in doing more with your Tablet, and you're accustomed to programing 
in Applesoft BASIC, then you might be Interested in looking into 
Chapter 3* It describes the internal operation of the Graphics 
Tablet software, and the operating subroutines In the Graphics 
Tablet itself. You'll find dozens of new applications for your 
Tablet* Go ahead, keep drawing, and have funl 
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THE PROGRAMS 



There are four main programs which comprise the Graphics Tablet 
software. Three of these programs are supplied on your GRAPHICS 
TAisLET SOFTWARE diskette, and the fourth is stored in ROM (Read-Only 
Memory) on the Tablet Interface card- These programs are: 

1) TAbLET-CODE APPLESOFT: This is a large applications program, 
written in the Applesoft II BASIC programing language* This is 
the program which performs all the commands and functions of the 
Tablet as described in Chapter 2. 

2) yUICK-DRAW: This is a machine language subroutine which is used 
by the TABLET-CODE APPLESOFT program. This subroutine allows an 
Applesoft program to draw lines on the Apple's high-resolution 
graphics screen as fast as the Tablet can supply the points* 
This machine-language subroutine is hidden inside an Applesoft 
program* 

3) Tablet Firmware: This is a set of subroutines permanently stored 
in ROH on the Tablet's Interface card. These are base-level 
subroutines for the basic operation of the Tablet. They can be used 
from any Apple programming language. 

4) UTILITIES: This is a package of machine-language subroutines 
which perform many of the screen manipulation functions of the 
TABLET-CODE program. This package Includes the subroutines which 
perform the SEPARATE and SLIDE operations. It also Includes the 
shape table used by the Applesoft DRAW command to draw the corner 
marks for the VIEWPORT. These subroutines are stored in a binary 
file on the diskette and load at location $6000 (decimal 24576) 
in memory. The length of this file is $330 (816 decimal) bytes. 

In addition, there are two other Applesoft programs which are used as 
part of the Graphics Tablet software package, but don't take part in the 
actual operation of the Tablet. They are: 

1) HELLO: This is the program which is executed when you boot the 
diskette* It is also executed whenever you exit the TABLET-CODE 
or MENU ALIGNMENT programs. It allows you to select which 
program you wish to run, and lets you quit if you want to. 
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2) MENU ALIGNMENT: Thi 

an information file 

This file contains Information 

is in and where the overlay i» 



is jiiiother Applesoft program that sets up 
on the diskette, called TAB. INFORMATION . 



about what 
located OD 



slot the Interface 
the Tablet. 
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TABLET-CODE APPLESOFT 

This is the main operating program for the Graphics Tablet. It Is 

written in Applesoft, and takes up 12K bytes of the Apple's memory. 
It resides between locations $1000 and $3FFF (decimal 4096 and 16383) 
of memory. It requires that your Apple have the Applesoft language in 
ROM or on a Language System Language card* It will not run with 
cassette or diskette versions of Applesoft. 

A source listing o£ this program appears in Appendix D. along with an 
atlas of subroutines* variables, and special locations* Here is a 
brief map to the program: 



Lines 



10-160 



17O-1B0 



190-194 



200-290 

3UO-310 
330-410 
420-520 
530-540 

W0-560 
$70-610 



Function 

Initialization. This section reads the Tablet 
information file* sets up all pertinent Tablet 
parameters, and initializes and clears Page 2 of the 
Apple's high-resolution graphics screen. It also 
places the program and its variables in the proper 
locations In the Apple's memory, and loads the 
UTILITIES subroutines* 

This is the main DRAW mode loop. These two lines take 
input from the Tablet pen and send it to the QUICK- 
DRAW subroutine to draw on the screen. The only way 
out of this loop is to press a key or press the pen 
outside the Tablet's working area (i.e., on the menu). 



These lines are executed when you press a ke y during DRAW 
mode. It you press any key other than ^yf , nothing 

happens. If you press B9 » y° u will be isked whether 
you wish to quit or not. Pressing any key other than Q 
will return you to DRAW mode. Otherwise, the HELLO program 
will be run. 



These lines sense when you press the pen to the menu* 
Line 280 is the main menu vector table. 

The CLEAR command. 

The LOAD command. 

The SAVE comnand. 

A subroutine to input the disk drive number during 
LOAD, SAVE, and CATALOG. 

The SOFT RESET command. 

The CATALOG command. 
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b20-640 
650 

660 

6J0-tt70 

8S0 
890-1120 

1130-1140 

1150-1290 
1300 

1310-1320 

1330-1340 

1350-1360 

1380-1390 

1400-1440 

1460-1560 
1580-1660 
1680-1720 
1740-1820 
1840-1930 
1940-ly50 

1970-1980 



The Background COLOR conmand. 
The HEN COLOR command. 

This line lets you reenter LINES, DOTS, BOX, or FKAMK 
node after a menu selection* 

This subroutine draws the color menu for BackG round 

COLOR* PEN COL0R t and SEPARATE, and lets you select a 
color with the pen- 
Color box low-resolution draw* 

The WINDOW command. 

This subroutine resets the Tablet WINDOW information after 
a color menu selection* 

The VIEWPORT command* 

This subroutine causes a 1.15 second delay- It is 
used to pause while the Apple is displaying a message 
on the screen* 

This subroutine waits until either a key Is pressed on 
the keyboard or the pen is pressed down, and then 
returns* 

This subroutine draws or undraws the four corner marks 
for a VIEWPORT* 

This subroutine draws a single VIEWPORT corner mark. 

The RED0CEK command. 
Turns on the REDUCER. 
The DELTA conmand. 
LINES mode- 
DOTS mode. 
FRAME mode. 

BOX mode- 

This subroutine la called whenever you specify a point 
outside of the VIEWPORT for any of the four modes 
mentioned above. 

The AREA command* This section is the drawing loop. 
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1990-2030 
20/O-2Ot*O 

2090-2 120 
2160-2290 
2300 

2310 

2320 

2330-2480 
2490-2580 
2590-2600 
2610-2730 



The calculation section for AREA. 

Tlie DISTANCE conmand. This section is the drawing 
loop* 

The calculation section for DISTANCE. 

The CALIBRATE command. 

A subroutine to blank out the four lines at the bottom 
of Page 2 of Text mode* 

A subroutine to display "BEGINNING POINT?" at the 
bottom of Page 2 of Text mode and wait for the pen to 
be pressed down- 

A subroutine to display "ENDING POINT?" at the 
bottom of Page 2 of Text mode and wait for the pen to 
be pressed down. 

The SLIDE command. 
The SEPARATE conmand. 

This subroutine resets the Tablet firmware. 
Error handling subroutines. 
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THE MAIN LOOP 

The main programming loop of the TABLET-CODE program occurs In lines 
170 through 290. Lines 170 and 180 are the main loop for the DRAW 
mode. The DRAWing is done by the CALL EPZ in line 170. This 
activates the QUICK-DRAW subroutine, which reads the Tablet and draws 
on the screen* As it draws on the screen* it also places the 
coordinates for each point plotted into the two arrays called XZ and 
XX* It uses the variable NX as an index into these arrays, and uses 
the value of the variable D% as its DELTA value (see the section on 
the QUICK-DRAW subroutine). The QUICK-DRAW subroutine returns to the 
Applesoft program when one of four events occur: 

1) A key on the keyboard was pressed. 

2) The pen was pressed down outside the working area of the 
Tablet. 

3) The pen was lifted after being pressed down. 

A) One of the arrays XX or YZ was filled up. 

When QUICK-DRAW terminates* the termination condition code (a number 
from to 3) is stored in location 700, and the Applesoft program 
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places this value Into the variable CD, Depending upon the 
termination condition, the program either reinitializes the DRAW modi 
or branches to line 190 (to handle a keypress) or line 200 (to get it 
menu selection)* 

If the pen was pressed outside the working area, then lines 220 
through 240 sense the pen's position again In relation to the menu. 
Two numbers are returned: X holds a number from to 2i which 
corresponds to one of 22 horizontal positions across the menu, and V 
holds a number (0 or 1) which corresponds to one of two menu rows. 

The UN Y+l GOTO 280*290 statement in line 250 selects between the 
top and bottom menu rows. The ON X+l GOTO 140..* in line 280 select* 
among the 22 menu items in the top row. 



MENU ITEMS 



Each menu item corresponds to a block of code ( not a subroutine) in 
the program* After the code for each item performs its function, it 
executes either a GOTO 170 (to reinstate DRAW mode) or a GOTO 660 (to 
reenter the current mode). A list of the variables which are used in 
the program and a description of their function appears in Appendix B. 
Subroutines which are called by parts of the program also appear in 
that Appendix* 

The four other modes (LINES, DOTS, BOX, and FRAME) are actually 
independent menu items which operate differently from DRAW mode. For 
an example, look at the code for the ETtAME mode, in lines 1740 through 
1820. Line 1740 resets the Tablet to accept points from the current 
WINDOW area, with a sparkling crosshairs cursor displayed. It also 
sets the variable CM (for Current Mode) to 3, for FRAME mode. Line 
17*0 loops until the pen is pressed onto the Tablet surface, and 
returns the coordinates of the point in X and Y. These coordinates 
can be used directly to plot onto the high-resolution screen- 
Line 17o0 checks to see if the point is inside the current VIEWPORT. 
If it is not, the subroutine at line 1940 is called. This subroutine 
checks that the point is in the menu area- If It is, it sets the 
variable RT to I; if not, it sets RT to and displays the message 

POINT OUTSIDE VIEWPORT- KESPECIFY. 

Back in line 1760, ii a menu item was selected, the code causes a jump 
to line 220 (menu selection). If the point was outside the viewport, 
the mode is restarted by a COTO 1750. 

If the point was inside the VIEWPORT, then line 1780 plots the point 
on the screen and saves its coordinates in the variables TX and TY. 
Lines 1790 through 1810 go through the whole get-a-point procedure 
again, and get another point in X and Y- Finally, line 1820 actually 
draws the FRAME, and Jumps back to line 1750 to get another two 
points. 
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EXTENDING THE MENU 

It you cati write programs for the Apple, then you can tailor the 

TADUCT-C0DB APPLESOFT program to your own liking. You can add extra 
functions and remove or modify existing functions. You can define 
your own nenu selections, or you can even start from scratch and 
write your own programs to use the Graphics Tablet to do just about 
anything* 



s 



The TABLET-CUDE APPLESOFT program uses almost all of the memory space 
allotted for it. If you wish to add a function to the code, you must 
delete some of the program to make room for it- If the program grows 
any larger, it vill not work. 



EXAMPLE: INSTANT COLOR MENU 



wait for the Apple to redraw the color 
is change the PEN COLOR from white to 
you can make to get instant changes in 
have to sacrifice one of the Tablet's 
will mean changing your TABLET-CODE 
you not work on the original backup 



If you're tired of having to 
menu when all you want to do 
black, here's a modification 
PEN COLOR. To do it, you'll 
other functions. Since this 
program, it's Important that 
diskette* 

Type 

NEW 

LOAD TABLET-CODE APPLESOFT 



to load the unmodified program. To make room for your new code, 

delete a function you don't use much (some good candidates for 
oblivion are SLIDiS, SEPARATE, AREA, DISTANCE, and CALIBRATE — they 
are special-purpose functions and their removal won't affect the rest 
of the program). Let's delete the SLIDE function. Type 

DEL 2330,2480 

Now you've got about 230 more bytes to use for your program. To 
replace the SLIDE command with a null command, enter the line 

2330 GOSUB 1130: GOTO 170 

to reset the Tablet and return to DRAW mode if you try to s*>lcet th« 
now-defunct SLIDE function- 



M 



What we'll do is let you choose a new PEN COLOR si»ply by pokhiK <«>* 
of the first eight squares in the second row of the menu- LahM thupit* 
squares on your menu with a pencil or pen: 




Now for the programming part- In lines 250 through 280, the 
variables X and Y hold the coordinates of the oenu box which was just 
selected. Y is set to for the top row and 1 for Che bottom, and X 
holds a number between and 21 corresponding to the 22 boxes in each 
row. So* if you poke the pen to one of the eight boxes of the new 
color menu, Y will be set to 1 and X will be a number from to 7 f 
depending upon which of the 8 squares you poked. It just so happens 
that the eight colors in Applesoft's high-resolution graphics mode are 
numbered through 7, and they are in the exact same order as the 
color names you wrote on the second row of the menul Isn't that 
lucky? But v first we've got to handle Y* In line 250, if Y is equal 
to 1, the program, goes to line 290, the null function* Let's replace 
that line with 

290 IF X<0 OR X>7 THEN GOSUB 1130: GOTO 170 

Now the null function is executed only if the pen was pressed in the 
second row and not In the first eight boxes. If the pen was pressed 
in one of the first eight boxes, the next line will be executed. So 
let's make the next line: 

295 POX: HC0L0R-PC: GOSUB U30: GOTO 660 

This line sets the Pen Color to the value of X (remember, through 
7?) and sets the high-resolution COLOR to that value* Then it resets 
the Tablet and goes to line 660, which reenters the current node* 

And that's it! Now before you HUH it save this version onto a copy of 
the GRAPHICS TABLET SOFTWARE diskette. You night want to add a REM 
statement at the beginning, describing the change and date* When you 
SAVE the program, you must save it under the name TABLET-CODE 
APPLESOFT or you won't be able to use it* Since the version of TABLET* 
CODE APPLESOFT that is on your diskette is LOCKed, you will have to 
UNLOCK it before you can save the new version* 
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To um« your newly modified program, type 
RUN HELLO 



p rt 1,V1 [J r and press BSSSB • whtM1 the progran Is 

running, you can Instantly change colors in midstream, from any mode 
by pressing the pen to the box for that color. 



EXAMPLE: CIRCLE MODE 



Here's another change which is a little more extensive than the 
previous one. Here are two extra modes, counterparts to BOX and 
KKAME, which draw open and filled circles rather than rectangles* 
You'll specify the location and size of a circle by poking two points 
on the Tablet: the first one will be the center of the circle and the 
second will be on the perimeter- Since this will require some extra 
ruonp (if you haven't done it already) delete a function such as 
SLIDE. In fact, you can delete both SLIDE and SEPARATE and use their 
menu squares to set CIRCLE and DISC mode- On a copy (not either of 
your original copies) of the GRAPHICS TABLET SOFTWARE diskette, type 

LOAD TABLET~CODE APPLESOFT 
DEL 2330,2580 

Now they're gone* Since CIRCLE and DISC need two points, just like 
SOX and FRAME, we can follow the example of those modes. Type 

2330 REM ** CIRCLE MODE ** 

2340 GOSUB 1130: PRINT D$;"IN#";SL: (M-5 

2350 RT-2: IMPITT X,Y,Z: IF Z<>2 THEN POKE -16368,0: GOTO 2350 

2360 IF X<X3 OR X>X4 OR Y<Y3 OK Y>Y4 THEN GOSUB 1940: IF 

RT-1 THEN 220 
2370 IF RT-0 THEN 2350 
2380 HPLOT X,Y: TX-X: TY-Y 

2390 RT-2: INPUT X,Y,Z: IF L<>1 THEN POKE -16368,0: GOTO 2390 
2400 IF X<X3 OR X>X4 OR Y<YJ OK Y>Y4 TOEfl GOSUB 1940: IF RT-1 THEN 220 
2410 IF HT-0 THEN 2390 

At this point, the coordinates ol the center of the circle are in TX 
and TY, and the coordinates ot a point on the perimeter are in X and 
Y. Let's find the radius of the circle now: 

2420 R«S^R((X-TX)~2+(Y-TY>~2) 
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With a little trigonometry, we know that the horizontal and vertical 

distance from the center of a circle to any point on tin- perimot«r In 
given by the simple formulae 

2440 DX«R*SIN(TH): DY-R*C0S(TH) : X-TX: Y-TY 

where R is the radius (derived in line 2420) and TH is an angle Inn 
to 2*pi. Furthermore, we know that this formula gives us not one, but 
eight points on the circle: 



X40X,Y+DY 
X+DY,Y+DX 



X+UX,Y-DY 
X-H)Y,Y-DX 



X-DX,Y+DY 
X-DY,Y+DX 



X-DX,Y-DY 
X-DY,Y-I)X 



as TH ranges from to pi/4 where X,Y is the center of the circle. 

So, let s add a loop and the lines to plot Che points on the 
perimeter. 

2430 FOR TH-0 TO .7854 STEP 1/R 

2450 HPLOT X+DX,Y+DY: HPLOT X4DX,Y-DY: HPLOT X-DX,Y+DY; 

HPLOT X-DX,Y-DY 
2460 HPLOT X-H)Y,Y+DX: HPLOT X+DY,Y-DX: HPLOT X-DY,Y+DX: 

HPLOT X-DY,Y-DX 
2470 NEXT Th: GOTO 2350 

Now to finish it all up, change the lines 

660 ON (MM GOTO 170,1580,1680,1740,1840,2330 

1380 k;)-k;hi; IF RU>1 THEN RD-0: GOSUB 1130: GOTO 660 

1390 GOSUtt 1400: GOTO 660 

These changes let you go back to CIRCLE mode automatically after 
making a menu selection. 

Now UNLOCK the old version of TABLET-CODE APPLESOFT that is on your 

diskette, (the one on which you're putting your own versions) and then 
SAVE this new version on your diskette* RUN HELLO and stare using the 
GRAPHICS TABLET SOFTWARE. When you want to draw an open circle, press 
the pen to the square marked SLIDE. Indicate one point for the center 
of the circle, and another for a point on the perimeter. The circle 
will be drawn to specification, and you'll remain in CIRCLE mode until 
you choose another- 

Be forewarned that if you make a CIRCLE which is too large for the 
screen, then you'll get an error. Just press G3 to get back to 
DRAW mode. If you don't like this "feature", the following lines 
will fix the problem: 
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2425 ON ERR GOTO 2480 

2470 NEXT TH: ON ERR GOTO 26S0 

2475 GOTO 2340 

2480 PRINT D$;"PR#0": GOSUB 2300: PRINT D$;"PR#";SL: PRINT "M2": 

VTAB 23: HTAB 12: POKE 41, PEEK(41)+4: PRINT "CIRCLE OFF SCREEN. 

RESPECIFY." 

2485 GOSUB 1300: PRINT DS;"PR#";SL: PRINT "N,H2": ONERR GOTO 2650 

2490 GOTO 2340 



Note that you can still sake circles which 
There's no easy way to prevent this* 



out of the VIEWPORT. 



EXAMPLE: DISC MODE 

The DISC mode is just the same as CIRCLE mode, except that instead of 
plotting individual points on the perimeter, you'll have to draw 
lines across the diameter to fill in the circle- Because they have so 
much code in consaon, you can make DISC use much of the code from 
CIRCLE. Here are the changes to CIRCLE to make It do DISCs, too: 

2340 CM-5: GOTO 2348 

2342 REM ** DISC MODE ** 

2344 CM-6 

2348 GOSUB 1130; PRINT D$;"IN#";SL 

2445 IF CM-6 THEN 2464 

2462 GOTO 2470 

2464 HPLOT X+DX,Y+DY TO X-DX,Y-DY: HPLOT X+DX,Y-DY TO X-DX,Y+DY 

2466 HPLOT X+DY,Y+DX TO X-DY,Y-DX: HPLOT X+DY,Y-DX TO X-DY,Y+DX 

To change the menu vector table so that the SLIDE square will activate 
CIRCLE and the SEPARATE square will activate DISC, change line 280 to 
read: 

280 ON X+l GOTO 140,300,5*0,6^0, 1460,550, 1150,2160, 1380, 650, 290, 1S80, 
1680,1740, 1840, 570, 330,420,2342*2330, 1970,2070 

and make this other change: 

660 ON CH+1 GOTO 170,1580,1680,1740,1840,2330,2342 

This next line lets you reenter both CIRCLE and DISC modes after you 
make a menu selection (such as PEN COLOR). Finally, if you added the 
error handling subroutine described above, then change it so: 

2390 ON Qi-4 GOTO 2330,2342 

Hiiw again SAVE your modified program under the name TABLET-CODE 
APPLESOFT on the diskette you're using for your experimentation. 
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THE FIRMWARE 



On the Graphics Tablet Interface card Is a 2K byte ROM (Read-Only 
Memory}* This HUM contains all Che subroutines which read and 
Interpret the signals from the Graphics Tablet- These subroutines 
can be used easily from any BASIC program. 

The Graphics Tablet Firmware performs many functions* Its main 
purpose is to read the position of the Tablet's pen on the surface of 
the Tablet * and return that position in a numerical form to a BASIC 
program. But. it also does much more: 

• It lets you supply horizontal and vertical offset information- It 
will use this offset information in calculating the pen position. 
This lets you place the origin (where the X and Y coordinates are 
both 0) anywhere on the Tablet surface- The offsets can be Integers 
from -32767 to +32767. 

• It allows you to give a scaling divisor, from 1 to 32767. 

You can tell the Tablet firmware to divide all coordinates by this 
number before it passes them to your BASIC program- This lets you 
calibrate the Tablet units (200 to the inch) to your own scale. 

• It allows you to select among ten different modes on the Apple's 
screen* Text* low-, and high-resolution graphics (on either Page 1 
or Page 2) can be selected, and you can mix text with graphics. 

• It automatically displays a flashing cursor on the Apple's screen, 
given the proper scaling and offset information- Cursors are 
available or may be supressed in all screen modes* 

• You can tell the Tablet to supress all output from your Apple- 

• You can read not only the position of the pen. but also whether it 
is within readable distance, whether the pen is up or pressed 
down, detect pen-down and pen-up movements, and read the keyboard 
to see If a key has been pressed. 

Your programs can communicate to the Firmware subroutines by using the 
BASIC commands PKf s. and IN# £ . where s. is the number of the 
peripheral connector slot in the Apple which holds the Tablet 
Interface card* (The PK# command indicates that all subsequent output 
Is to be directed to the Firmware subroutines in a certain slot, and 
the IN# command indicates that all subsequent input Is to be taken 
from the Firmware subroutines in the given slot.) When your program 
wants to stop talking to the Firmware subroutines. It ran issue a PRfO 
or IN#0 command to direct output or accept input from the normal 
screen and keyboard. 
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To avoid alienating DOS (the Disk Operating System), you'll have to 
issue the PKf and IN* commands in the form of DOS coamands. See the 
section on Selecting I/O Devices in your DOS manual. 



TABLET CONTROL 

To send control information to the Tablet* Just execute a PR# s. 

coranand from BASIC and PRINT a string of Tablet Control commands* The 

Control coimnands will not be displayed on the Apple's screen: they 

will be used by the Tablet alone* 

There are seventeen Tablet Control comnands* These commands take the 
form of a letter or a word, sometimes followed by a number. Commands 
are executed in a sequential order as given to the tablet by the 
user* 

Comnas are used as delimiters between coimnands and must not begin or 
end the command string* Spaces are Ignored* A null string issued to 
the tablet is invalid* Only the first alphabetic character of a 
command is meaningful; the other alphabetic characters are Ignored and 
may be omitted* 



Following is a list of Tablet Control comnands. The letter 
follows some of these commands represents an integer* 
Control commands are: 



« n M 



that 



The Tablet 



TEXT n 



HGR n 



LGR n 



H1XHCR n 



Sets the Apple's screen to show text mode- n 
determines which page of Text to display and can be 
either I or 2* 

Sets the Apple's screen to show full-screen high- 
resolution graphics mode* n determines which page 
graphics to display and can be either 1 or 2* 



of 



UK n 



Sets the Apple's screen to show full-screen low- 
resolution graphics mode* n determines which page of 
Graphics to display and can be either 1 or 2* 

Sets the Apple's screen to show high-resolution 
graphics mode, mixed with four lines of text at the 
bottom* n determines which page of text and graphics 
to display and can be either i or 2* 

Sets the Apple's screen to show low-resolution 
graphics mode, mixed with four lines of text at the 
bottom- n determines which page of text and graphics 
to display and can be either 1 or 2* 
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SCALE n 



XOFF n 



YGFF n 



AFTER 



BEFORE 



NOPRINT 



CURSOROFF 



Sets the Tablet scaling divisor to n* All 
coordinates generated by the Graphics Tablet will he 
divided by n before they are given to your proj>r/im. 
The range for n is 1 to 32767* If you give the Tablet 
a negative scaling divisor, it will ignore the mlntm 
sign and use the positive number* A scale factor of 
is undefined and will not work* 

Sets the Tablet horizontal (X) offset to n* If the 
R command Is enabled, all horizontal coordinates 
will have n added to them before they are given to 
your BASIC program- The offset value, n, may range 
from -32767 to +32767. 

Sets the Tablet vertical (Y) offset to n* If the 
R ccmmand is enabled, all vertical coordinates will 
have n added to them before they are given to your 
BASIC program (see R ccromand below)* The offset 
value, n, may range from -32767 to +32767. 

Ignore scaling divisor* None of the coordinates 
generated by the Tablet will be scaled or offset. The 
cursor, however, will not Ignore scale and offset 
information. 

Use scaling divisor. All coordinates generated by the 
Tablet will be divided by the scaling divisor before 

they are given to your BASIC program. Then offset 

values will be added* 

If the R ccroraand is used, the offsets will be added 
after the scaling operation* This command is turned 
off (the BEFORE command is reinstated) with any 
subsequent command which sets a screen mode, including 
the DEFAULT conrmnd. 

If the R command in used, the offsets will be added 
before the scaling operation* 

Disables all on-screen printing. After a NOPRIKT 
canraand is sent to the Tablet, no new output generated 
by the Apple will be displayed on the screen* NOPRINT 
mode is turned off by any other Tablet Control ccramend 
string or by a BASIC PR#0 command. 

Turns off the sparkling cursor. The cursor will remain 
off until any other Tablet Control command is sent which 
sets a screen mode (the DEFAULT command also turns the 
cursor on)* 

Sets Stream mode* If the pen Is within the proximity 
of the Tablet, the Tablet Firmware will send coordinates 
each time it is polled, regardless of the pen position 
or status* This command is turned off (the Q command 
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is reinstated) with any subsequent comvand which sets £ 
screen mode, including the DEFAULT command* 

q Resets Stream rode. The Tablet firmware will send 

coordinates only when it is polled, and the pen is 
pressed down* 

DEFAULT Sets the standard (default) Tablet mode: 

• HGR 2 screen code 

• SCALE- 16 

• XOFF-1536 

• YOFF-1536 

• F (no scaling or offsets) 

• BEFORE 

• Q (stream mode off) 

• Cursor on 

• Printing on 

For example, if the Tablet Interface card is in slot number 5 and you 
want the Tablet to set low-resolution graphics mode, with four lines 
of Text at the bottom, use a scaling divisor of 16, and use the 
offsets stored in the variables Xu and YO, and apply them before the 
scaling, you would use this Tablet Control command: 

PR#5: PRINT M GR 1, SCALE-16, XOFF- u ;XO;", Y0FF-";YO; M , BEFORE":PR*0 

Of course, you could shorten It by eliminating extraneous spaces and 
using only the first letter of each Control command name: 

FR#5: PRINT "G1,S16,X M ;XO;",Y";YO; ,, ,B M :PR»0 

Since you are using Apple DOS, you must use DOS's PRl command in order 
to use both DOS and the Tablet- If you've got the slot number of the 
interface card in the variable SL, then the same Tablet Control 

comaand would read: 

■ 

PRINT D$; M PRiT;SL:PRlNT l, Cl i S16 t X H |X0j* t Y l, (T0l t, »B tt :PRIW D$;"PR#0" 

It's Important not to add i semicolon (;) or comma (,) at the end of 
the Tablet Control PRINT string. The Tablet will execute the command 
only when it receives a RETURN character* A semicolon or a comma 
after the string will suppress the RETURN; therefore, the Tablet will 
never carry out vour coranands because it won't hear the end of them. 

Any illegal construct in a Control conmand, including numbers out of 
range, will cause the screen to return to text mode and the message 

*** TABLET SYNTAX ERROR 
to appear on the screen- 
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ACCEPTING INPUT 



Unci- you've told 
K"*t t Iiik from it , 
Hit* pen coordinates 



the Tablet what kinds of numbers you expect to be 
you can use the BASIC statements 1N# and INPUT to get 



and status information from the Tablet- 

The* Tablet sends Its coordinate and status information in this f ormat : 

+0000 , 40000 ,^00 

X-position Y-position sign status 

The X- and Y^position coordinates must be integers from -9999 to 
+9999- The user is responsible for adjusting the X and Y offsets and 
the scale value so that values returned by the tablet fall within 
this range* Lt Is possible to exceed this range* in which case an 
Applesoft error will be generated* These coordinates indicate the 
position of the pen on the Tablet- If the R command is in effect, 
these coordinates indicate the position of the pen plus the offset and 
divided by the scaler. 



The sign and status digits Indicate the status of the pen and 
keyboard- If the sign is negative, then a key has been pressed' 
two digits have separate meanings: 



Th« 



00. 



Tens digit: 

- pen is on scale 

1 ■ pen is off-scale 



Ones digit: I 

■ pen is down* and has been down: 

1 * pen was just lifted 

2 ■ pen was just pressed down 



^1 

-I 



So let's write a program to read the Tablet and print out the 
coordinates, without scaling or offsets, on the Text screen* Let's 
assume that the slot number of the Interface card is stored in the 
variable SL- 



100 PKfSL; PRINT 
110 INfSL: INPUT 
120 PRINT "THE X 
130 IF 2<0 THEN 
140 IF ABS(Z)>-1 
150 Z-ABS(Z): IP 
160 IF Z«0 THEN 
170 IF Z-l THEN 
180 IF Z-2 THEN 
190 PRINT 
200 POKE -16368, 



"Tl, F, C, P"; PR#0: REM INITIALIZE TABLET 

X,Y,Z: IN#0: REM READ TABLET 
-POSITION IS ";X;'\ THE Y-POSITION IS ";¥;*♦>" 
PRINT "THE KEYBOARD HAS BEEN PRESSED." 
THEN PRINT "THE PEN IS OFF-SCALE," 

Z>-10 THEN Z-Z-I0: REM GET ONES DIGIT 
PRINT "PEN IS DOWN*" 
PRINT "PEN WAS JUST LIFTED." 
PRINT "PEN WAS JUST PRESSED DOWN-" 

0: GOTO 110:REM CLEAR KEYBOARD STROBE, REPEAT 



± 



This program will work in either Applesoft BASIC or Apple Integer BASIC, 
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Line 100 sets the Tablet Control parameters* Line 110 gets input from 

the tablet, and the remaining lines Interpret the values and print an 

explication- Line 200 clears the keyboard strobe (if a key was 
pressed) and loops back to get another set of values* 

This program works in Stream mode, that is, it is continually getting 
input from the Tablet regardless of the position of the pen. If you 
change the Tablet Control command string to read 

100 PR#SL: PRINT "Tl, F, C, Q": PR#0 

then the coordinates will be returned only when the pen is pressed 
down* 

Let's write a subroutine in BASIC which is to return the X and Y 
coordinates of the next pen p ress, or return with the variable KY set 
to 1 If the user presses the ^3EM '* oa C ** e keyboard. Let's 
assume that the Tablet has been initialised in the main program (see 
previous example, line 100). 

200 REM ** SUBROUTINE TO GET A PEN PRESS OR KEYPRESS ** 

210 KY-0: REM FLAG FUR KEYPRESS 

220 INfSL: INPUT X,Y,2: INI0 

230 IF 2-2 THEN RETURN: REM PEN DOWN 

240 IF Z>0 THEN 280: REM NO KEYPRESS 

250 K-PEEK(-16384); REM GET KEYPRESS 

260 IP K<>13 THEN 280: REM IS IT A RETURN? 

270 IBM: RETURN: REM YES, IT IS* 

280 POKE -16368, 0: GOTO 220: REM NO, KEEP LOOKING. 



FROM MACHINE LANGUAGE 

You can perform the same Tablet operations from within a machine 
language program that you can from a BASIC program. Even though 
machine language programs are a little more difficult to write, they 
will run faster and use less memory than their BASIC counterparts- 

Your machine language programs will invoke the various functions of 
the Graphics Tablet firmware by performing JSR (Jump to SubRoutine) 



operations to subroutines inside the 
the PR* and IN# statements in BASIC. 
Information to the Tablet by storing 
memory, and will receive information 
In other fixed locations, instead of 
a» a BASIC program would. 



Tablet's ROM, rather than using 

Your programs will pass 
it in fixed locations In 
from the Tablet by storing it 
using PRINT and INPUT statements 



Since the Tablet firmware operates in the same manner regardless of 
whether lt is being driven by a BASIC or a machine language program, 
HiIh section will explain only the specifics of machine language 
operation of the Tablet- For a description of the modes and 
parameters which the Tablet firmware recognises, please see the 
previous section* 
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The Tablec firmware is absolutely located Id the Apple's memory at 
locations $CS0O through SCFFF. This is a 2K memory space which is 
shared by all peripherals* and can be used by any one peripheral 
card at any time- In order to let the Graphics Tablet card take 
posession of this common ROM space, you must reference two special 
memory locations- First* you must reference location SCFFF. Tills 
will turn off all interface cards which may be using the common ROM 
space- Then you must make at least one reference to any address in 
the range $CnOO through $CnFF. where n is the number (from to 7) of 
the peripheral connector slot which holds the Graphics Tablet 
interface card* Once this is done, the Tablet's ROM will be placed 
into its proper memory range and you can reference its subroutines 
normally* 

After you activate the RON* you should store the slot number of the 

Graphics Tablet (in the format $Cn) in location S07F8- This lets 
other Apple programs know that the Tablet is active and in use. 

Subroutine POINT (location $Cn02) lets you read a single point from 
the Tablet* The coordinates of the point* along with the pen status 

information, will be stored as a 15-character long ASCII string, 
beginning at location 50200 and ending with a RETURN code at location 
SU20E. The format of this string is described in the previous section 
called ACCEPTING INPUT. 

The subroutine DEFAULT (location $CE90) sets all the Graphics Tablet 
parameters and modes to their default values- It operates the same as 
the Tablet control command DEFAULT* 

The subroutine MREAU (location SCBB9) allows you to read the pen 
position and status quickly, and get the result in binary (rather than 
ASCII, as POINT does). It returns the X and Y coordinates in the 
following locations: 
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XFFL $0281 

XFFH $0282 

YFFl $0283 

YFFH $0284 



IBM 



$U28U 



Lower byte of X-coordinate 
Upper byte of X-coordinate 

Lower byte of Y-coordinate 
Upper byte of Y— coordinate 

Pen status 







The X and Y coordinates are number a from ~32767 to +32767. Notice 
that this Is a greater range than the coordinates passed by POINT. 
The numbers are in two's compliment form, and the high bit of the 
upper byte of each coordinate determines the sign of that 
coordinate. The pen status byte is Interpreted much the same as it 
for POINT: the lower 4 bits represent the pen status and the upper 
bit represents the keyboard status. 



If 



-a 

E 4 
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The SCALE subroutine (location $CB70) is normally called immediately 
after MRfcAl). it performs a scaling and offset operation on the 
X and Y coordinates generated by HREAD and places the result** in these 
four locations; 



TEMXL §0285 

TKMXH $0286 

TEMYL $0287 

TEMYK $0288 



Lower byte of scaled X-coordinate 
Upper byte of scaled X-coordinate 

Lower byte of scaled Y-coordinate 
Upper byte of scaled Y-coordinate 



These values are also In two's compliment form and range from -32767 
to +32767. 

The CURS0R0UT subroutine (location $C8F0) is normally called 

immediately after an HREAD. CURS0R0UT calls SCALE and uses the scaled 
results to place a cursor on the Apple's screen. The cursor is placed 
by an exclusive-OR operation, so another call to CURS0R0UT using the 
same coordinates will remove the cursor and leave the screen 
unchanged. 



The CURSOROUT subroutine places the cursor on the screen which the 
Tablet was told to display. It is not necessarily the screen which 

the Apple is currently displaying. If you manually change the screen 
setting after calling DEFAULT or setting the Tablet PAGE parameter 

(see below)* then the Apple may be displaying a video mode which is 
different from the one In which the Tablet is displaying a cursor- 

You can pass parameters to the Tablet firmware by storing the proper 
values in special memory locations* Here are the locations used by 
the Tablet firmware. 

The MSLOT parameter (location $07F8) contains the number of the slot 

(In the format $Cn) into which the Graphics Tablet Interface card is 
plugged* 

The PAGE parameter (location S03B8+MSL0T) holds the code for the 
current video mode: 



520 high-resolution page 1 

$01 low-resolution page 1 

$21 Mixed high-resolution page 1 

505 Mixed low-resolution page 1 

$04 Text page 1 

$00 Ho cursor 



$40 high-resolution page 2 

$02 low-resolution page 2 

$42 Mixed high-resolution page 2 

$0A Mixed low-resolution page 2 

$08 Text page 2 



U you set the high bit of the PAGE byte, then the scale and offsi-t 
factors will be applied. 
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The MPAGE paraoeter (location S0438+MSLOT) holds some of the 

information as the PAGE parameter. The lower six bits of MPAGE are 

derived from the lower alx bits of PAGE exclusive-ORed with the 
constant $23. The upper two bits represent the A, &» P» and Q 
parameters: 



Bit 7 ON: Stream mode on Bit 7 OFF: 

bit 6 ON: Offset after scale Bit 6 OFF: 



Stream mode off 
Offset before scale 



The scale and offset parameters are stored in the following locations! 



SCALL S04B8+MSLOT 

SCALH $05384«SLOT 

OFFXL S05B8+MSLOT 

OFFXH S0638+HSLOT 

OFFYL $06b&+«SLOT 

OFFYH S073B+MSLOT 



Lower byte of scaling divisor 
Upper byte of scaling divisor 

Lower byte of X-offset 
Upper byte of X-offset 

Lower byte of Y-offset 
Upper byte of Y-offset 



The scaling divisor is a binary Integer from to 32767. The offsets 
are two's compliment binary numbers from -32767 to +32767. 



QUICK DRAW 

The yUICK-DRAW program is a machine language subroutine which 
acts as an intermediary between the Tablet Firmware and an Applesoft 
program. Since an Applesoft program using HPLOT cannot draw on the 
High-Kusolution screen fast enough to keep up with the movements of 
Che pen across the Tablet, the QUICK-DRAW subroutine talks directly to 
the Tablet and plots the points on the high-resolution screen. QUICK- 
DRAN also makes the points plotted available to the Applesoft 
program* 

QUICK-DRAW must run on an Apple with at least 16K bytes of memory, the 
Applesoft II BASK: programing language in HUM or the Language System, 

and a Graphics Tablet interface card. The Graphics Tablet Firmware 
must be activated by an IN* command before QUICK-DRAW can be called. 

The QUICK-DRAW subroutines art? hidden Inside an Applesoft program. 
When you RUN QUICK-DRAW, the Applesoft program will store the 
subroutines in the memory range $C0O-$FKF (decimal 3072-4095). The 

entry point for the subroutines will be placed in memory locations 
S2F0 and $2F1 (decimal 732 and /SJ). Your Applesoft program, which 
you will RUN right after you RUN QUICK-DRAW, can PEEK at these 
locations and get the entry point by executing this line; 

100 EPX«FBKK(752)+256*PEEK<753) 

The QUICK-DRAW subroutine deals directly with four Applesoft 
variables. When you CALL the QUICK-DRAW subroutines, it takes the 
coordinates of the points it receives from the Tablet and places them 
in the two Applesoft arrays XZ and IX. It uses the Applesoft variable 
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NX as an index into these arrays. The subroutine also uses tin* 
contents of the variable D% as a DELTA value. It is the QUICK-DRAW 
subroutine which controls the DELTA and Audio Feedback features of tin* 
Tablet software. 

You oust dimension the arrays XX and YX prior to calling QUICK-DRAW. 
Also, you must assign a non-zero value to DJ. The D% value is used as 
described in the DELTA function in Chapter 2; if the value of DZ is 
negative, then the Audio Feedback feaure will be turned off. 

The QUICK-DRAW subroutine will return control to the Applesoft program 
under any of four conditions: 

1) A key on the keyboard was pressed before the pen was pressed 
down. 

2) The pen was moved to a place on the Tablet which does not 
correspond to a position in the current VIEWPORT. 

3) The pen was lifted after being pressed down Inside the 
VIEWPORT. 

4) There Is no more room in the arrays X.:. and Yl to store 
coordinate values. 

When one of these conditions arises , the code for that termination 
condition will be stored in location $2BC (decimal 700) and control 
will be returned to the Applesoft program. 

You can define a VIEWPORT for the QUICK-DRAW subroutines by storing: 

• the coordinate of the left edge in locations 3089 and 3090; 

• the coordinate of the right edge plus one in locations 
3091 and 3092; 

• the coordinate of the top edge in location 3093; and 

• the coordinate of the bottom edge plus one in location 3094. 

See lines 1100 and 1120 of the TABLET-CODE APPLESOFT program for an example 
of how to pass VIEWPORT coordinates to the QUICK-DRAW subroutine. 



BY ANY OTHER NAME 



You can change the names of the variables which QUICK-DRAW will use by 
txecutlng a special CALL to QUICK-DRAW. Normally* QUICK-DRAW usea 
these variable names: 



DZ for the DELTA value 

XX for the X-coordinate array 



NX for the index to the armyn 
YX for the Y-coordinat t* array 



6ft 



You can change theuo four variable names to be whatever you like* 
Ihwever, they nust always be of the integer variable type (denoted by 
the percent sign (X) following the name). To rename the variables* 
us* thin format: 

220 CALL KPX,DELTAX,NUMBERX,XVALX,YVALX 

Since Applesoft only recognizes the first two letters of a variable 
name, this will make QUICK-DRAW use the variable DEX for its DELTA, 
NUX for NX, XVX for XX, and YVX for ?X* If you want to change only 
one of the names, just leave the others out, but keep the proper 
number of 



230 CALL EPX,,INX,, 

will make QUICK-DRAW use the variable INX instead of NX* You oust 
keep the variable names in the order DX,NZ,XZ,YX* 
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CARE OF THE MENU OVERLAY 

You can write on the clear plastic menu overlay with most anything: 
soft (Number 2) pencil:-, felt-tip pens, permanent markers* crayons, 
and the like. However, ball-point pens tend not to write well on the 
overlay, and colored or hard lead pencils also have problems. 

You can wipe the overlay clean of most narks or doodles you have drawn 
using a soft cloth and a mild soap-and~vater solution* Host marks 
from felt— tip or "permanent 1 * markers can be removed easily* Some 
markers, however* will leave truly permanent scars on the overlay; 

It's a good idea to test any marker on an inconspicuous corner of the 
overlay before you use it to draw all over your Tablet* To be safe* 
use felt-tip markers designed for use on acetate or mylar (or for use 

with overhead projectors)* These will give you visible, non-smearing 
colors, but the marks will wipe off without a trace* 

If you are getting inexplainable "glitches 11 on your screen you 
probably have a static problem* The solution Is simple: Wipe the 
overlay with the static cloth that came with your Graphics Tablet* A 
treatment with the cloth should remove any excess static from the 
overlay* 



CARE OF THE TABLET 

Your Graphics Tablet is constructed of a solid wood base, protected 
below by a sheet metal baseplate and above by a molded, snap-on 
plastic cover* If the top cover gets dirty* it can be cleaned with a 
soft cloth and a mild soap-and-water solution. Don't use any 
abrasives or strong detergents on the surface or case of the Tablet: 
they may scratch or damage the plastic. If possible, keep the Tablet 
covered when you aren't using it* 

IXJU'T loavt! anything which has a strong magnetic field on or near the 
Tablet. This will disrupt its natural magnetic orientation and make 
it malfunction* Keep your diskettes off the Tablet 1 Its magnetic 

field may alter or erase the Information on them* Don't place disk 
drives, televisions, electric motors, magnets, or large, heavy 
metallic objects on top of the Tablet. 

Keep the Tablet In a cool, dry place* Don't leave it in direct 
sunlight or in a car trunk or some other hot, stuffy place* Too much 
heat will warp its cover* 

Be careful with the Tablet when you're moving it from place to place. 
Don't drop it or jar it* Even though it's pretty solid, it can be 
seriously damaged by a bad fall. 
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The Interface card is really the most delicate part of the Graphics 
Tablet. When inserting* removing* or transporting it, be very careful 
not to bend any of its pins or components. To be safe, always carry 

it in the box in which it was shipped, nestled in protective foam. 
Keep it away from strong electrical or magnetic fields, and don't 
even think of touching it if there's a lot of static electricity in 
the area- 

If you've been inserting and removing the Interface card into the 
Apple a lot. then it's possible that the metal "fingers" have gotten 
dirty and are not making good contact with the Apple* In this case, 
the easiest way to clean the fingers Is to just use an ordinary pencil 
eraser and rub all of the gunk off. If you want to be thorough, use 
cotton swabs and rubbing alcohol to clean the fingers on the card* 



IF IT DOESNT WORK 

If you've exposed your Tablet to bad magnetic influences or it's been 
bumped and jarred a lot, it may develop "dead spots" on Its surface, 
spots where the pen won't draw. These aren't permanent, they're Just 
a loss of magnetic orientation in certain spots of the Tablet. Take 
the Tablet to your Apple service center- The service center should 
have the proper equipment to reorient your errant Tablet and make it 
work again. 
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With Two Disk Drives 
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With One Disk Drive 
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WITH TWO DISK DRIVES 
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If your Apple has two disk drives, you can easily make a copy of 
either GRAPHICS TABLET SOFTWARE diskette by using the diskette copying 
prog rata on your Apple SYSTEM MASTER diskette* You will need three 
diskettes: 

1) One of the GRAPHICS TABLET SOFTWARE diskettes, enclosed 
with your Tablet; 

2) The SYSTEM MASTER diskette, enclosed with your 
Disk II; and 

3) i\ blank, uninitialized diskette- If you like, you 

can use a preinitialized diskette, but all information 
on that diskette will be destroyed- 

Boot your system using the SYSTEM MASTER diskette (see your DOS 
manual, or, if you Have an Autostart ROM, see your Autostart ROM 
manual) and type 

RUN COPY 

After the disk drive stops whirring, place the GRAPHICS TABLET 

SOFTWARE backup diskette in one drive, and place the blank diskette in 

the other. The GRAPHICS TABLET SOFTWARE diskette will be the 

"Original", and the blank diskette will be the 'Duplicate". Follow 

the instructions in the section on using the COPY program in your DOS 
manual - 

Once you've copied the diskette, label the duplicate so you'll know 
what it is- Then put the original away in a safe place* If you ever 
lose or destroy the duplicate* then before you start to use the 
original, cnake another copy of it* It's also a good idea to 
periodically make duplicate copies of the diskettes which hold your 
pictures* 
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WITH ONE DISK DRIVE 
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■quart notch on the left aide of the diskette. This is important! It 
will prevent you from accidentally destroying anything on the original 
diskette. How insert a blank, uninitialized diskette in the drive. 
Vou can use a preinitialized diskette, but all information on it will 
be destroyed. Type 

IN IT HELLO 

ami press E22B ■ You're now inlLlallzing the diskette with the 
HELLO program from the GRAPHICS TABLET SOFTWARE diskette. This takes 
about a minute. 

Now switch to the GRAPHICS TABLET SOFTWARE diskette and type 
LOAD MENU ALIGNMENT 

Now switch to the duplicate diskette and type 
SAVE MENU ALIGNMENT 



Now switch to the GRAPHICS TABLET SOFTWARE diskette and type 
LOAD TABLET-CODE APPLESOFT 

Now switch to the duplicate diskette and type 
SAVE TABLET-CODE APPLESOFT 



Now switch to the GRAPHICS TABLET SOFTWARE diskette and type 
LOAD yUICK-DRAW 

Now switch to the duplicate diskette and type 
SAVE O^JICK-DKAW 



Now switch to the GRAPHICS TABLET SOFTWARE diskette and type 

BLOAD UTILITIES 

BLOAD GRAPHICS TABLET LOGO 

Now switch to the duplicate diskette and type 

bsave utilities, as6000, ls330 

bsave graphics tablet logo, a$2000, l$2ooo 



If your Apple has only one disk drive, then you'll have to copy all 
the programs which comprise the GRAPHICS TABLET SOFTWARE package one 
by one, loading each program I run the original diskette and saving It 
to the duplicate. it's a lengthy procedure, but well worth your 
trouble. 



Press 



Now remove the diskette and write-protect it by sticking a 
write-protect tab (a thin but sturdy strip of tape will do) over the 



Boot your system using the GRAPHICS TABLET SOFTWARE diskette. 
to get to the HELLO menu, selc< i Q :>> QUIT, and press 
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Now enter this program: 
NEW 

10 D$-CHRS<4) 

20 PRINT D$;"0PEN GRAPHICS TABLET SOFTWARE" 

30 PRINT D$; "WRITE GRAPHICS TABLET SOFTWARE" 

40 PRINT "RUN QUICK DRAW" 

*U PRINT "RUN TABLET-CODE APPLESOFT" 

60 PRINT D$;"CLOSE GRAPHICS TABLET SOFTWARE" 

/0 ENO 



/I 



RUN 

This short program creates an EXEC file called GRAPHICS TABLET 
SOFTWARE, whose function Is to set up the Apple to RUN the programs 
which make the Graphics Tablet work. You need to have this file on 
every duplicate diskette you make; if you're going to be making many 
duplicate copies, you might want to SAVE this short program so you 

don't have to retype it every time you need it* 

To SAVE this program* type 

SAVE FILEMAKER 

Then* whenever you're making a duplicate* put In this diskette and 
type 

LUAD FILEMAKER 

put in the duplicate diskette* and type 

RUN 

That's all there is- Once you've copied the diskette* label the 

duplicate so you'll know what it Is and put it away in a safe place. 
If you ever lose or destroy the original* then before you start to use 
the duplicate* make another copy of It* 
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UNUSUAL COLOR EFFECTS. . . 



You may 
you try 
Tablet. Don't 
are caused not 



have already noticed that a few strange things happen when 
to use certain combinations of colors with the Graphics 

worry: these are normal, predictible phenomena which 
by the Tablet, but by the Apple Itself. 



■ -i 



The Graphics Tablet displays Its pictures using the Apple's high- 
resolution graphics mode. In this irode, there are 53,760 individual 
dots on the screen, and six colors (black, white, orange, blue, green, 
and violet). The Apple should therefore need several hundred thousand 
individual "bits" of information to form a picture- But the Apple 
uses only 63,536 bits of information (organized into 8,192 eight-bit 
"bytes") to form the picture! The reason the Apple can display such 
complex pictures using so little memory is the same reason that 
sometimes the colors don't appear normal: not all colors can be used 
in all places on the screen, and each dot is limited In the number of 
colors it can be* 

This specialization of function causes some combinations of colors to 
work differently than you might expect- There are three different 
effects which are caused by the limitation in the color scheme. They 
occur in all drawing modes, but only where one color borders another 
and the borderline is not horizontal. For example, the color problems 
could occur on the two vertical sides of a FRAME but not on the top or 
bottom. Here are the three effects: 

1) DASHED LINES. When you draw black or white lines on a 
colored field (or vice versa), non-horizontal lines will 
tend to become dashed and incomplete, and vertical lines 
may not appear at all* 

2) ZEBRA STRIPES. When you draw colored lines on a colored 
field, non-hortzontal lines don't appear their normal 
colors, but instead are sometimes black-and-white striped. 
Vertical lines will appear either completely black or 
completely white. 

3) COLOR FLIP. When you draw with one color (or black or white) 
across a colored Held, sometimes a seven-dot wide area around 
a non-horizontal line will change color. This will result 

in a colored "shadow" appearing around the line- 

These effects occur in various combinations, depending upon the color« 
you use. 
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. . . AND HOW TO GET THEM 

The table on the next page Illustrates seven different combination ol 

the effects mentioned above, and what color combinations product 
which effects. To use the table, find the pen color you're using 
along the left side of the table* Then look on the top edge ol the 
table and find the color of the area on the screen across which you 
want to draw. Where the row for the pen color and the column for the 
field color intersect, there's a number. Find the number in the 
legend to the table and read about the effect you'll get. 

About BLACK! t WHITEi, BLACK2, and WHITE2: Due to the vagaries of the 

Apple's color generation scheme, there are two instances each of the 

colors black and white. When you look at the Tablet color menu (see 
the section on PEN COLOR in Chapter 2), you'll see that there are two 

black squares and two white squares along with the four colored 
squares* The black and white in the top row are BLACK1 and WHITEI; 
the ones in the bottom row are BLACK2 and WHITE2. The reason for the 
duplication is that the l's cause fewer problems when used with green 
and violet than do the 2*s, and similarly the 2's go better with blue 

and orange than do the l's. When this book refers to black or white. 
It weans black! or WHITEI. 
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pen COLOB 





BLACK 1 


GREEN 


VIOLET 


WHITE1 


BLACK2 


ORANGE 


BLUE 


WHITE2 




BLACK 1 





2 


2 


I 





2 


2 


1 




'.Kt.K.N 


2 





3 


2 


4 


5 


6 


4 




VIOLET 


2 


3 





2 


4 


6 


5 


4 




WHITbl 


1 


2 


2 





1 


2 


2 







BLACK2 





2 


2 


I 





2 


2 


1 




ORANGE 


4 


5 


6 


4 








3 


2 




BLUE 


4 


6 


5 


4 


2 


3 





2 




UHITE2 


1 


2 


2 





1 


2 


2 








FIELD COLOR 



Color Effects Table 

LEGEND: 

0: No effect. 

1: Colors appear as expected; no anomalies. 

2: DASHED LINES on non-horizontal lines; vertical lines may 
disappear. 

it ZEBRA STRIPING on non-horizontal lines; vertical lines appear 
solid black or white. 

4: DASHED LINES with a COLOR FLIP. 

5: Pure COLOR FLIP: non-horizontal lines appear "chunky" and wider 

than normal. 

6: ZEBRA STRIPING with a COLOR FLIP. 



•J 
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•6 
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m 4 
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APPENDIX D 

PROGRAM LISTINGS 



80 Tablet-Code Applesoft 

85 Variable Atlas 

87 Subroutines 

88 Special Locations 

89 ROM Code 
108 Quick-Draw 

118 Utilities 
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TABLET-CODE APPLESOFT 

10 »E« * TA&LfiT 50FTWARE* COP^IGHT APPLE 1979, Q EHLERS * 
20 LOmEM 253*2 

10 d» - chp» t4) print d*- "close graphics tablet software" 
40 qmcpp goto 2610 

50 Dft • CHP# 44); PRINT Oft- "OPEN TAD INFORMATION* Dl ", PRINT D»* "READ TAB 

INFORMATION" INPUT SL. INPUT XL INPUT YL INPUT *H INPUT fH 
oO PRINT PRINT OS* "CLOSE TAD INFORMATION' 

'0 OJ*ERP CO-0 2650 

10 EP% ■ PEEK (753) ♦ 256 * PEEK 1752). k% - BOO 

*0 DIM fXfMXl. XX<M£) 

:00 PRINT D»- 'BLGAD UTILITIES- At6000* 01 " 

HO <A - XH - TLYA ■ YH - YL: LT 3 INT < ( XA * YA) / 2) PI - IMT (LT / It 

120 SO ■ INT iXA / 1! ♦ 5) 

120 tlO » INT *PI / Z) XH • XL: vh - 2 * (10 * YL 

140 HGR2 PC * 3. DC ■ 0. HCCLOR* PC.U ■ 1 OF ■ 1 

150 *1 ■ XM • 2. Yl ■ VH • 2 X2 » ( INT < < XH * 2 - X 1 > / 280 * 5) * 290 1 Y 

2 ■ INT iX2 « 192 / 290) X? ■ XI: X6 * X2. YJ ■ Yl Y6 * Y2 

160 OX ■ - : 5M ■ 52. GOSUD 1C70RD * O 

170 CM - 0;N% • 1: CALL EP%: CD ■ PEEK <700) ON CD ♦ 1 SOTO 1*0* 209* 170* I 

?o 

130 GOTO 1?0 

L90 PRINT PRINT Oft. "PR»0" PRINT Dft* ■ I JHO": GET Al IF ASC <A*> < ': 2 

7 THEN 200 
192 TEXT HOME VTA8 12; HTAB 13. INPUT "QUIT? (Y OR N) ".A* IF A* ■ " 

V* THEN HG«E : VTAB 12: HTAB 10: PRINT "LOADING HELLO PROGRAM"- POKE 

104. 9 FDt'.E 103-1: PRINT Dt. "RUN HELLO* Dl" STOP 
194 CC5UB 1130; COTO 170 
200 I? PECK <640> C > 2 THEN 170 
2:0 POKE 6*0*0 

220 xf - xl • 2yf - yl • 2 sf » so: 008ud 2990 rem sense 

menu 
230 PRINT «INT Dft*"lN«"*5L 

240 INPUT X.v>Z: IF V > I THEN OOSUO 1130 COTO 170 
290 IP Y C ■ 1 AND Y > • T>«N PRINT Dft, "PRBO" PRINT CHP* (71: MINT 

1 PRINT Df*"PRft"-SL PRINT *H*i ON Y ♦ I GOTO 280*290 
260 GOTO 230 

270 TEXT PRi PRINT "ERROR" STOP 

250 ON X * 1 COTO 140* 300* 690- eZO* 1460*550* U50* 2160* 13C0* o50* 390* 1530* 16 

90* 1740* 1340. 570* 330/ 420* 24*0* 2330* 1970. 2070 
290 GOSUB 1120 GOTO 170 

300 IF XT « O AND VT m y3 AND <4 * XD AND Y4 * Y© THEN HCQLOR- 3C *L0T 

0*0 CALL 624^4 GOTO 520 

3t0 HCOLGR- 9C HPLOT X3* Y3; FOR Tl * Y3 TO Y4 HPLOT X3, Tl TQ X4. T| **E*T 

HCCLOR* PC GOSUB 1130. GOTO 170 
330 TEXT PRINT Dft* "PflllO" HOME VTAB 7; HTAD 6 PRINT "PLEASE TVPE THE 
PICTUPE NAME. ■ PRINT MTaB 7: PRINT Dft* "INM": INPUT "--> ".E* |P 

Dft ■ ■" THEN GOSUB 1130 GOTO 170 
340 VTA3 9 HTAB 37 CALL - 563 HTAB 1 G0SU3 530 
345 Dft » "PIC " * Dft CttEHfl GOTO 400 
350 PRINT D*r "BLOAO •* Dft* "* Aft4*3G0. VO* DV Cft 

360 S2 ■ PEE* (l©632) • 256 + *^£EK <1*>633> IF S2 :1 • O Ty&i \?Q 
370 XI ■ PEEK (16504) * 256 * *-EEK <16505> X2 * PEEK <16506* * 256 * PSE> 
*lo507KVl - PEEK < 16508> • 25* * PEEK < 16509) Y2 ■ PEEK <16510^ • 

256 * PEEK < 16511) 
380 ONERR GOTO 2650 
390 HOME GQTO 520 

400 B» - PICHTt ■ : i LEN 3< - 4>t ONERR GOTO 265G 

410 PRINT Oft- "BLOAD -* Ofti '\ Aft40CO- VO* 0"* Cft : GOTO 150 

TEXT PRINT Dft*"*PR»0": HOME VTAb 7 HTAD 3 PRINT *PLEA3E TYPE A N 

AME FOR THIS PICTURE " PRINT HTAB 7 PRI«T Dft*"lN«0" INPUT "■-> " 

101 IF Bl = "" THEN GOSUQ 1130 GOTO 170 

VTAB 9: HTAB 37- CALL * 868 HTAB 1 GOSUD 530 

GOSUB 1330 HCOLOR" DC GOSUD 1040 H * INT <XL / 256> POKE 16504, rt 
POKE 16505* XI - H • 256: H ■ IRT ( X2 / 256) POKE 16506* H POKE 1650 

7.X2 - H * 256. H ■ INT m / 256> POKE 16508* H: PCKE 16509. Yl - H ■• 

256 

4*0 H ■ IMT CY2 / 256) POKE 16510*M POKE 16511-Y2 - H * 256 H • INT <S 

2 / 256> POKE 16632/ H: PGME 16633*32 - H • 256 



E 



w * 

a) 
J 

■A 

m =t 



4*0 
470 
430 

490 

500 
•10 
520 
S30 



540 
550 
5*0 
570 
5B0 
590 
600 
610 
620 
630 
640 
b50 
aoO 
^70 
630 



690 



710 

720 
730 

740 

750 
760 
770 

700 
790 
300 
810 
020 
330 
840 
850 
860 
G70 



* i 



420 



430 
440 
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F 4 



ONEPR 
EXISTS 
IF Eft C 



D'\C% 



a* * *pic h * at o^JEnp cotq 490 

HC0L0R* PC PRINT Dft* "VERIFY -.B^.-.O^iCft 
VTAO 21 HTAB 1 PRINT "A PICTURE ALREADY 
HTA3 12 INPUT "CONTIbWE (V OR N) ",£•; 
ONEPR SOTO 2650 

PRINT Dfti "BSAVE "* Oft* "* AS40C0- LftlFFS, VO 
hOKE . PRINT Dfti "PR*"* SL PRINT "H2, N" 
G0SU3 1C90: PRINT D«*"IN#";3L: GOTQ 170 

VTAB 10 CALL - 958 PRINT : HTAB 16: PRINT "DRIVE ■ 
-DFiM"; HTAB 25 INPUT " "i Cft; IF C* < > T* AND Cl 
Cft - STRf (DF) 
OF » VAL iCft): VTAB 11; HTaO 24: CALL - 958: PRINT Cft 
PEM +** SO^T REEET COMMAND **• 
CCSUB 1330 GOSUB 1090. DX * - 2; GOTO 170 
TEXT PftlNT D«* -PR(*0" HOME PRINT Dft- "IN*0" GGSUft 530 



GOTO 2650 

HTH THAT NAME ", 

> "Y" THEN 510 



POINT 



DEFAW-T*' 
**2" T^£N 



RETURN 



THEM 600 



HOME HTAB 7: PRINT "PRESS SPACE DAR TO CONTINUE 

PRINT Dft- "CATALOG D">C» 

POKE - 16363/0 GET Aft; IF Aft < 

GOSUB 1130 GOTO 170 

PEM «*• BACKGROUND ANO PEN 
Tl ■ PC: G0SU3 670: IF PC » 
8C ■ PC:PC ■ Tl HCOLOfi* DC 
T3 ■ PC; GOSUB 670 GOSUB 1130' IF 

ON Crt + i GOTO 170- 1560* 1680* 1740* 
>[P • KM * 2: YF » YK * 2 SF - 

PRINT Dft* "PR#0" TEXT HOME 



PGKE 34,2 



COLOR 
3 THEN 

HPLor 



PC ■ 
0-0* 
PC ■ 
1840 
INT <<XH - 
PRINT Dft 



Tl: GOSUB 1130 GOTO 
CALL 62454 GOTO 520 
8 THEN PC » T3 



MQ 



"FR«*, 



140) 

SL: PRIN1 



'S1*P- * 



5" 5F GR 



* Y-,YFi 
R M£w 

COLOR* 
XB - 9 Y8 ■ 
GOSUB 830 

eeo 

X9 * 2 Y9 » 
20 Y9 - 21 
HOME * VTAB 22: 
PRINT Dft* "PR*" 



FOR 
17; 
X9 

21 
C9 



12 » 
<9 s 
- 20: 



HOs-E 

TO 39 
2: Y9 » 1 

Y9 ■ Z.i 



VTAB 22 HTA0 9 PRI^T "C^aTSUCT IN* 



XF- " 

COLO 



HLIN O* 39 AT ZZ NEXT 
; C9 ■ G05U8 880. X9 - 11; Y9 * 
9 ■ 3; GOSUB 880; X9 - 29 *9 • 2 



2 C9 - 12 

C9 • 15; G0SU2 



C9 - o GOSU8 830: t* w 1 1 ■ V9 
■ 6: GOSUD 330 X9 - 29- Y9 • 3 

HTAB 7 PRINT "USE THE PEN 

SL: PRINT "N" 



» 21 C9 » 

I C9 m 15* 

TO P(CK A 



9 GOSUB 530 ^ 

GC3UB SSO 
COMM- "■ P*INT 



PRINT Dft "INt-fSL. IHPUT X- v. Z 
B: X ■ Y o PRINT IF ASC 

IF Z ■; ^ 2 THEN 730 
X • INT <X / 7);Y ■ INT (Y / 4l 
IF Y < 2 CR Y :- 37 OR Y ■ 19 OR Y 

PRINT D». ^PR*0" PRINT CHR» (7> 

(X - 2> / 9) + i GOTO 790?00.310 
INT £(X * 2J / 9) » \ ^QTQ 



IF Z < 

(Aft) ■ 13 



TMEN 

then 



PRINT 

PC ■ 8 



Dft- "INWO 1 

RETURN 



ON 

PC 

PC 

PC 

PC 

PC 

PC 1 

PC ■ 

PC 
NCME 
0: NEXT 
COLOR- C9 
. RETURN 



■ 20 OP 
IF V M 
820 
330*840.850< 060 



■ s 2 OR 
AND Y < 



X ; 
19 



37 THEN 

THEN ON 



SET A 



73? 

:nt 



o 

i 

2. 

3 

4- 

5: 

6: 

7 



8* - 

B» - 

Bft m 

Dt . 

Bft - 

Df = 

D« - 

Bft - 

■-■tab 



"BLACK 1 

■GREEN" 
*V10LET 
'WWITEI 
"0LACK2 
^ OR AME 
•BLUE": 
'UHITE2" 
22 HTAD 



GOTO 8^0 
GOTO S7'» 
GOTO 9^0 
COTO 970 
GOTO 3^0 
GOTO 370 

soro s:o 



(40 - LEN <Bft>> 
HCOLOR- PC HOME RETURN 
FOR ZZ • I TO X8 VLIN Y9* Y9 
REM COLOR BOC LO-RES DRAW 



/ 2; PRINT Bft FOP ZZ • 1 TO 30 



* Y8 - \ AT X9 X9 



X9 



^tXT 



390 

900 
• 10 

•«0 

930 

940 

*50 



•60 
970 



980 
ft90 



REM •* 

PRINT PS INT 

TEXT HOME 

PRINT Dft* "PR« 

THEN PRINT 
IF Z < THEN 
IF Z < > 2 THEN 
PRINT D». PPHO" 



JINDOU COMHAMD •»' 

Dft* "PR»"*SL 
VTAB 9; HTAB 



PRINT "Tl.F.C": PRINT D». 'PP«0 - 
15. PRINT "PRESS PEN AT" PftJNT 



*SL: PRINT "N< C" PRTNT D»*"IN»'.SL INPUT 

D»i"lN90"* «T A* IF ASC (Aft) m 48 THEN 

IF ASC <A»> ■ 13 THEN GOSUB 1130 GOTO 
920 

IF X < XH «■ 2 OR Y < YM * 2 TH£N VTAB 22 HTAB 

FOR 2J ■ 1 TO 500 



HTA0 3 INVEftBE 
% f y.Z: IF 2 s 
GOSUB 1330 + HCOLCR= 
170 



CHRft <7), 'PLEASE STAY WITHIN THE WORK-AREA 

ZZ VTAB 22. CALL - 868 7GTQ 920 

VTA3 11 CALL - 868: HTAB 3 PRINT "UPPER-LEFT AND 

-LOWER-RIGHT" NORMAL 

PRINT Dt,"PR*"iSL PRINT "N. C" INPUT TX* TV. I IF Z < THEN 

»j"INBO- GET Aft* IF ASC 'Aft! « 66 THEN GOSUB 1330: HCOLOR 

1040 XI • X5: X2 < X6 YI ■ v5 Y2 » Y6 GOSUB 1070: GOTO 170 

IF I < THEN IF ASC (AH • 13 THEN GOSUB 1130: GOTO 170 

IF Z < >2 THEN 970 



WEffSE 



4 PRINT 

NEXT 

PRINT 



PRINT D 

DC: -,Qav2 



81 



I coo 



:o;o 
1020 

1030 
10*0 



PRINT PRINT D». *PR*0": ir TX > XH • 2 OR TY > YH ♦ 2 TW£« VTAB 22 
HTAB 4 PRINT CHR» (7>* "PLEASE STAV WITHIN THE WORK AREA ■ FQR IT 

* 1 TO 300: NEXT ZZ + VTAB 22 CALL - 660: GOTO 970 

IF TX ^ * OR TY <; Y THEN VTAB 22: HTAB 5 PRINT C*«* (7). "PLEASE S 
PECIFf POINTS CORRECTLY 1 ": FOR 11 • 1 TO 500; NEXT ZZ COTO 9l0 
XI - X.X2 » TX - XI * l:Vl - Y.Y2 ■ TY - Yi * I 

C0SU3 1330: HCOLOR* BC; GOSUB 1040: COSUB 1070 OOTO 170 
XT ■ INT (OF>:XB ■ 279 - XT YT ■ INT !HF>*YB « 191 - YT IP XT \ ■ 
2 THEN HPLQT XT - l.VT TO XT - I. YB: HPLOT XT - 2, YT TO XT - 2. YB HPLOT 
XB * 1* YT TQ X& * 1* YB HPLOT XB » 2. YT TO XB * 2- YB 



J* 



1030 

1060 
1Q70 



1000 
1100 



HPLOT XT*Y3 



IF Tl < T2 Tr«N S2 • T2 IF 



IF VT > ■ I THeN **L0T XT, YT - I TO XB* YT - 
*G. VD + 1 

RETURN 
Tl * X2 / + 280 T2 ■ Y2 / 195 
T2 THEN 52 » IMT (T2> + 1 
1080 IF Tl / « T2 THEN S2 » Tl IF INT (Tl* < Tl THEN S2 

I 

PD ■ COSUB 1130: HCOLOP* IF BC ■ OR BC - 4 THEN HCOLC* 
COSUB 1040 HCQLOR" PC 01 ■ INT (XT / 2561:32 - XT - 81 • 25* 
INT (<XB * 1> / 256) 04 » <XB * I) - B3 • 256. 05 ■ YT 06 - YB 
- INT IXT) X4 ■ INT (XD):Y3 • INT (YT) Y4 ■ INT IV0) 

■"■ ON^RR GOTO 2650 



I TO 



[NT (T2> 



IMT 1T1 > * 



3 
B3 
' I. 



<3 



:no 

J 120 

1130 
1140 

1150 
U60 
1170 

1130 
11*0 

1200 
1205 
1310 
1250 
1230 
1240 
12*0 



1260 
1270 



;*sq 



12=0 



isoo 
1310 
1220 
1330 

1340 



<;Q5<J3 1330: HCCLOR- PC : un - 1:W* 



BX + l,Bl POKE B 
5* 86: RETURN 

RETURN 
■ (192 - Y2 / S2) 



• S2) 5F - S2: CQSU3 2590 



THEN HCOLOR* O 
S2>:YF • 1HT (Yl - 



BX = 306? POKE 3X,fl2. PQ*£ 
POKE BX * 4*35: POKE 8X * 
IF RD y O THEN GOSUB 1400 
GF - 1280 - X2 / 52) / 2: HF • (192 - Y2 / S2) / 2 
S2> YF « INT (Yl - HF 
REM *** VIEWPORT COMMAND *•* 
HCOLOR* 3 IF BC • 3 CR 3C ■ ? 
COSUB 1330: XF - INT (XI - GF 

GCSVB 2590 
COSUB 1290 OOSUB 1310 

IF 2 < THEN PRINT 0»i "INRO": PRINT : CET Ai 
GOSUB 1130 COSUB 1330; hCDLQR- PC COTO 170 
IF Z < THEN IF A5C (A»> ■ 63 THEM COSUB :090 
IF Z < THEN GOTO 11S0 
IF XT t X OR XB < X OR VT > Y OK YB < 
Tl * X - t;T2 ■ Y - I H - X8 - Tl Y6 
COSUB 12E0. GOSUB 1310: IF Z < THEN 
IF XT } X OR XB < X OR YT I- Y OR Y8 < 
IF X : Tl OR Y < T2 THEN COSUB 1350: 
VTAB I2 L HTAB 5 PRINT "PLEASE SPECIFY 



X * 2.B4 PQ*E 8X 



3, QJ 



XF • INT 

RETURN 



(XI - GF -* 






HF * ._ ;■" - 52 



IF A5C (At I ■ 13 THEN 



COTO 170 



Y THEM 


1180 




- T2: i 


S05UB 


1350 


GOSUB 


1350 


GOTO 


Y THEN 


1230 




PRINT 


Of. "PR»G - 


POINTS CORRECTLY 



1190 



- T£XT 



*c;ie 



QQSUB 120Q 



>i.: 1140 GOTO 1130 

1 W t » COSL'O 2590 RD ' 

Tl * 1: Y3 - T2 * 1 X4 m X 

INT *X3 / 256) B2 - X3 - I 

11 - B3 » 256. B5 - Y3 86 



CO 
*M - 
*3 - 
1 • 
\ X4 * 

170 

PRINT PRINT Gti'PR^O**' Q08W 

23 HTAB 15 PO*C 41, P££K <4|> 

T3 « I TO 500 NEXT PRINT Dl< 

PRINT PRINT D*. 'PR»0* C 
23: HTAB 15 PQ»*£ 41. PEE*- 
T3 - 1 TO 500 '*XT PftpiT 

FOR H - I TO 1000 NEXT h 
PRINT D«*"lN« ta .&L INPUT " 

GOTO 1310 

POKE 223*99 POKE 232.32 

3 

H - *8 * X3 - 1 Y8 - Y3 
1: COSUB 1350: H - 32 XB - 
X3 - 1 Y8 ■ Y4 * 1 GOSUB 



O 

V4 - Y H ■ GOSUB 1350 COSUB 1330 S 
1 * 256 B3 - INT ( ( X4 + l> / 25ft) 34 - 
■ Y4 * i. GOSUB 1120 HCOLQ*- PC GOTO 



2200 
+ 4 
PRU'V 
■:<-& 2300 
41) * 4 
D». -PR«* 
RETURN 

»t X-Y.Z 



PRINT D*» *'PP«".SL: PRINT "M2" 
PRINT CHfl# <7), ^LC^ER-PIGHT^" 
SL PRINT "N.H2" RETURN 

PRINT D». **PR#-.SL PRINT M2" 
PRINT CHR* <7>. "UPPER -LEFT?" 
SL. PRINT "N-MB - : RETURN 



VTAB 

PC* 

V7A3 



IF 



2 0* I < THEN RETURN 



"CQLGR- IF DC • GR 6C ■ 4 THEN HCOLQ=' 



1350 

13&0 
1380 

1390 
1400 
1410 

1420 



xa + 
1350 

mND 



IF X8 > * O AND XS < 230 
I XDRAU 1 AT X8. Y6 

RETURN 
RD " RD * l: IF RD > 1 THEN RD 
80- 1680. 1740. 1840 

COSUB 1400 ON CM + 1 GOTO 170. 1 580 

IF X4 • X3 OR Y4 » Y3 THEN 1440 
Tl - UXH * 2> - tXH * 2>> / (X4 
Y4 - Y3> SF ■ IMT (Tl); IF T2 < 



DOHA 1350 H i 

1 Yfl • Y4 * I 

RETURN 
Yfl J - O AND 



16 XB 

;qsub 



■ X4 

1350 



H 



YS 

4a 



Y3 - 



\ \*Z TKEM ROT- 



5CALE- 



Q0$U8 1130 ON CM * I COTO 170.15 



1690, 1740. 1Q40 



XF ■ INT <<XM * 2) - CSF * X3>> 
A0S <XF> 2 270C0 OR ABS <YF) ,1 



- X3> T2 • HYH * 2> - 
Tl THEN SF ■ INT tT2> 
YF - INT ((YN * 2> - <SF 
27000 THEN COTO 1440 



*Y(1 » 2)) / ( 



Y3)K IF 



82 



W 4 

f 4 

E 4 

e 4 

# 4 

F 4 

W 4 

r 4 



PRINT 
) * 4- 



: i -PR»-,SL PRINT 
PRINT "NOT POSSIBLE, 



M2. C^ 

■ RD 



PfUNT U*t ,t PB-0 1 



P^INT Dl; 



SETTING": VTAB 5, 
" ": PRINT : A* - 



1430 GOSUB 2590 RETURN 

1440 PRINT D»*"PR»0"t COSUB 2300 PRINT 
VTAB 23 HTAB 14 POKE 41. PEEK (4 
OOSUB 1300 COSUB 1130 RETURN 
14*0 PRINT . PRINT D«« "PRIT'jSL PRINT -T1,C* 

IH»0 M TEXT 
1470 HOHE P»INT \ HTAB ft PRINT "FAST-ORAU DELTA 
7: PRINT "CURRENT DELTA SETTING IS ". AB5 iJ>X> 
; IF DX < THEN A« ■ -CFF " 
HTAB 10 PRINT "AUDIO FEEDBACK IS *i A» 

VTAB 18 CALL * 958. HTAB 11. INPUT "NEW DELTA EOUALS m i A*: IF Al 
" n T1CN 1530 
IF VAL (At) < 
IF OX ■: 1 THEN 
DX ■ VAL (At) 
VTAB 20 CALL 
• « THEN 1560 

IF LEFT* <A*,2) < > "ON" AND 
DX » ABS (DX)' IF LEFTt <A«.3) 
COSUB 1130 GOTO 170 
CGSUB 1130. PRIKT Dtf"INP 



HTAB 

ON. " 



1430 
14Q0 

1500 
1510 
1520 
1530 

1540 
'550 
I5©0 
1580 
15^0 
1600 

1610 
1620 
1620 
1640 

1650 
1660 
1660 

16*0 

17C0 

1710 
1720 
1740 
1750 

1760 

1770 
17B0 
1790 
1G00 

1310 
1M0 
1340 
1850 
I860 

1370 
I 8 BO 
18*0 
1*00 

1910 
1920 

1930 

1*40 

|9*0 



1970 

19^5 
19B0 

1990 



I OR 
DX ■ 



VAL (A 
- VAL 



i> > 127 THEN 1490 
(A») OOTO 1530 



- 958: HTAB 9. IW»UT *TUPN AUDIO FEEDBACK '>A1: IF A» 



LEFT* (A*. 3) 

- "OFF* THEN 



< 
DX 



OFF" 
- DX 



THEN 1530 



RT - 2: INPUT X. Y. Z IF Z 

IF X < X3 OR X > X4 OR Y 
220 

IF RT ■ THEN 1590 

HPLOT X. Y 

RT - 2; IWUT X- Y, Z. IF Z 

IF X < X3 OR X > X4 OR V 

250 
IF RT a THEN 1630 
HPLOT TO X«Y: GOTO 1630 
COSUB 1130: PRINT D*» "INB 
RT » 2. INPUT X.Y*Z. IF Z 
IF X : X3 OR X > X4 OR V 
220 

« THEN 1690 
X.Y GOTO 1690 
lllO: PRINT D*, "IN* 



SL: 

> 

Y3 



CM ■ 1 

2 THEN 

OR Y ^ 



IF RT 
hPLOT 
COSUB 

RT ■ 2: 
IF X i 

220 
IF RT 
HPLOT 

RT - 2 

IF X 

220 
IF RT 
HPLOT 
GOSUB 

RT - 2 
IF X 

220 
IF RT 
HPLOT 

RT ■ 2 
IF X 

220 
IP RT 
IF Y ■ 

FOP H 
IF (Y 
PRINT 
MTAB 3 

ECIFY * 
COSUB 

5* 1980, 
IF NX 
HPLOT 

170 
PRINT 
HTAB 

NX - 2 



INPUT 
K3 OR 



Z. 

X4 



IF 

OR 



:: Y3 



SL 
> 

Y3 



SL 
> 

Y3 



■ O THEN 1750 

X, Y.TX • X TY - Y 

INPUT X. Y, Z IF Z 

X3 OR X :» X4 OR Y : 

o THEN 1790 

X. Y TO TX. Y TO TX. TY 

1130 PRINT p*. N IH# - 



INPUT 

*3 Q* 



K. Y, Z 
I > X* 



IF 
OR 



- THEN 105O 

X.Y TX - X TV 

INPUT X. Y. r 

! X3 OP X > X4 



. Y 
IF Z 
OR ¥ 



> 

Y3 



TO 
3L 

Y3 



Y3 



2 THEN 

OR Y > 



CM ■ 2 

2 THEN 
OR Y > 



CM » 3 
2 THEN 
OR Y > 



2 THEN 
OR Y :> 



POKE - 
Y4 THEM 



POHE - 
Y4 THEN 



POKE - 
Y4 THEN 



POKE - 
Y4 THEN 



POKE - 
Y4 THEN 



iCSUB 



GCTO I -*»0 

1940 IF FT * 



I THEN 



16363 
2Q5U3 



16366. 
G0SU3 



lo265 

0QSU8 



16366 

OQfiUl 



GOTO 1630 

1940 IF RT m 



+ GOTO 1690 
1940 IF RT i 



0: OOTO 17*0 



Tm£U 



1 TH£N 



1940 IF RT - 1 THEr; 



GOTO ! 

1940 IF 



790 

RT * 



1 TW£N 



X. FY TO X. Y 

CM - 4 

2 THEN POKE 

OR V ;• Y4 THEN 



CO TO 1750 

- 16368. 
GO&UB 



GOTO 1650 
1940. IF RT • 



2 THEN 
OR Y ;■ 



POKE - 
Y4 THEN 



16368* 
GQ5U3 



0: OOTO 1 
1940: IF RT 



1 THEN 



1 THEN 



» O 
TY 



THLTN 

THEN 



1QVO 

FOR 



K 



Y TO TY: HPLOT X»H TO TX* H NEXT 



CQTO 1850 



« TY TQ Y: HPLOT X. H TO TX, H NEXT GOTO 1950 

• SF * YF - YL # 2> / SO C 2 THEN RT • x RETURN 

DB. -PRBO": COSUB 2300 PRINT D**"PR«*.SL PRINT - rt2": VTAB 23 
POKE 41. PEEK (41* * 4: PRINT "POINT 3VT5IPE VIEWPORT. *E5P 
GOSUB 1300: PRINT Qt, "PRr*. SL. PRINT "N, H2" RT ■ 0: RETURN 

U30 N* * 1 CALL EP:: CD - PEEK < 7C0) 0»* CD * 1 GOTO 1 9 Q< 197 

1980 

- I THEN 1970 

X%U), YSJU) TO XX<NV. - 1)*YX(N* - 1>: GOSUB 1990 CCSUB 1130 GOTO 



C*. "PP»0« GCSUB 2300 PRINT D«. "PR*". SL: PRINT "tt2" VTAB 23; 
4: POKE 41. P££K (41 > * 4: PRINT CHRt ( 7 1 * "CALdXAT INC. ": IF 
THEN AR - 0: GOTO 2020 
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*'=. 



2 coo 

2010 

E020 

2030 

20 ?0 

£0? 5 
*030 
20*0 

2100 

:uo 

2110 

SIM 

2:70 
2130 

r:?o 
2200 

2210 
2220 

3i30" 
2240 
2250 

22*0 

224,5 
2270 
2S9C 

22^0 
2300 

2310 



IV,<71 i 



( INT (Aft * 100> * 
41. PEEK 4 41 i * 



H'AB II - 



3 NT 



AB3 
100 
GCSUB 2 

LE« ^ 



I700> ON CD * 1 GOTO 1*0-20? 



'PRil n *5L. PRINT 'K2" VTAB 
CHft* <?>, "CALCULATING. . . " 



A? i O *0R T| » 2 TO NX - i D* - XS<TI) - XXiTl - t ) DY 

vscti - t>> / 2 ar - *p ♦ c* * ov next u 

AR > AR * <X%(1) - JCX<NX - I>> • (*V^(1J * 
1AR» / Ufl A 2 IF Af» < Q*<*«9QQ9 THEN AM m 

GC3U0 3900 VTAB 23 3* ■ -^REA IS ■ POKE 
030 COSuB 1300 COSuO 1300 RETURN 
B* - B» * STF* 4AR> * - 5-frAR£ * * U» * " 
*> / 2) PRINT 3* RETURN 

GOSUB H30 NX - L CALL EKE: CD ■ PEE* 

5,2oac 2cec 

IF N*A » 1 THEN 2070 

GOSUD 20*0 OOSUO 1130: GOTO 170 

PRINT &*, *FR#0 M : GOSUB 2200. PRINT 0** 

HTAB 1* PC*£ 41. PEEK (41) • 4: PRINT 

NX - 2 THEN DT » 0: GOTO 2110 

DT * O; FDR Tl ■ 2 TO NX - ! DX » XXITl) - XX<T| - 1 > DV » YX<T!> - Y 

::<Tt - 1) DT » DT + SOR <0* * DX + DY * 0Y>: NEXT DT 

DT ■; 999999999 THEN DT - \ INT <0T • 100) > / 100 

COSUB 2300 VTAB 23 B§ • 'THE DISTANCE IS ": POKE 41* 

QCSUD 2120: COSUD L300 GOSUB 13CO RETURN 
5* - 3» * STRt (DT> ♦ " " * W% * - "; HTAB 21 - INT 
PRINT 3* RETURN 

gosub U30 

GCSUB 2310 

print c*. "in**, sl 

A»: IF a£C iai) * 

if z *: :* 2 then 
if X3 :- X CR *4 •: 
GOSUB 2320 
PRINT DV "II*#Fi SL 
A8G (Aft) ■ 
> 2 THEN 



:':-jo 



IF 



DT / Urt (F 



PEEK (41 * * * 



LEN <fl*i / 2> 



INPUT X*Y. 2; IF 2 < O THEN PRINT Dl 
13 THEN GOSUB 1130 GOTO 170 
PRINT 10T0 2180 

X OR Y3 : Y OR Y4 < Y THEN 2170 



EW 



7^' 



tf 


* 


23 10 


■= 


~al 


2720 

25DO 
2540 


^ 


* 


2550 

2560 
2570 


r 


1 


25*0 
1600 
2*10 


S 7 


* 


2620 


r 


*i 


2630 
2633 


«. 


sJ 


2640 
2650 




2*60 


^ 


< 


2670 
26S0 



iwyr r>i ty, z. if z 
13 THEN GOSUB 1130: 
PRINT GOTO 2220 
IF TX 1 /3 QR TX > X4 OR TV < Y3 OR TV 
PRINT OVPRr'iSL PRIMT "T1,CV TEXT 



AS IF 
IF Z 



C THEN 
GOTO 170 



PPINT 0»- M IN»Q- GZT 



^ < 



SCr» fTl • Tl * T2 4 

INT <DX>t" SCREEN UNITS 

CALL 



> Y4 THEN 2210 
HOME Tl » TX - X * 1 72 - T 

r2>. VTAB 10 HTAB 6 PRINT "DI5T 

PRINT 0». *IN»0 M 
"YQUR NUMBER OF UNIT5 -> ■»*•: IF 



'TYPE OF UNITS -> ", W» IF LEN 



2 3M 
2330 

::ao 

23^0 
2360 

23^0 

::>ic 
23^0 
2^00 

2410 
2420 

2430 
2440 
2450 

2460 

24 70 
24fc0 
2490 



Y - V * 1 DX 
ANCE IS ■ 

VTAB 19 CALL - 959 HTAB 8. INPUT 
Aft = " THEN W - 0X t GOTO 2290 

IF VAL 'A»> :> 9999'9 < ?<?99 THEN 2260 

W • VAU <At>* IF U » THcN 2260 
VTAB 20 CALL - 958: HTAB 8 INPUT 

'Uft> > 10 THEN 5290 

Ml » DX / W OOSUB 1130 GOTO 170 
FOR T4 e 21 TO 24 VTAB T4 HTAB 1 PQK£ 41, PEE» <4l 1 * 4 PRINT " 

*p: NEXT T4 PRINT RETURN 

PRINT D«> -PR10 4 : SOSUB 2300 PRINT 0«. "FRft'-i SL PRINT ■«"- VTaB 23 
HTAB 13 POKE 41, PEEK (4l> + 4 PRINT CHR* < 7>, "BEGINNINO POINT-' 
POR T3 » 1 TO 500: «XT PRINT Dt^PR)|-*SL: PRINT M N. H2"; RETUPN 
PRINT Ct. M P***0" G05U8 2300 PRINT Cft. M PRIk <v i SL 1 PRINT -M2" VTAB 23 






HTAB 14 PC*'E 41. PEEK (41 > +4 PRINT 

T3 - I TO 500 NEXT PRINT D****PP«-. SL 

REM *»^ CHRIS' SLIDE **• 

G0-SU3 1310 HCOLOR- BC: G05U8 1040 

GOSUB 1130 1 G05U3 2310 

PRINT Oi> '-[Nit'^SL INPUT (-V.2, IF Z < 
A* IF ASC (Atj - 13 1HEN 2470 
IF I : ; 2 THEN PRINT GOTO 23fc0 

IF x ■: o or x : 279 or y .. or v ;< 191 

GOSUB 2320 

PRINT Dl* "INK". SL INPUT :■:. TY* I IF I <: O THEN 
ASC *A») - 13 1HEN J470 



CHR* <7)» "ENDING POINT"*- ^Cfl 
PRINT "N, H2": RETURN 



-**• 



O THEN 



flNT Ct. "INHO* 



then 2330 



F»JNT Df. "JNiC 1 



;e: 



> 2 THPN 

( QR TX > 



At IF 

IF Z 

IF TX 
2390 

[F TV 

IF Y 

IF TX > X 
GOTO 2470 

IF X r TX THEM 



PRINT 
279 OR 



KITO ?4I>0 

- : OR TY 



> Y THEN 
TY THEN 
THEN 



FOR ZZ - 

FOR 2Z - 

FOR 11 » 

FOR ZZ - 



1 



191 OR CTX * < AfJD TY • Y> 7*%U 



50 T 2450 



TO TY - Y CALL 25218 NEXT 

TO Y - TY CALL 25175 NEXT 

TO [NT <<TX - X) / 14) + CALL 25308. NEXT 

TO INT <<X - TX) / 14) CALL 25261 NEXT 



r * 
* * 
r ? 



HCOLOR- IF BC * OR 3C - 4 THEN HCCLCR* 3 
GOSUB 1040: GC&JQ 1330* HCOLOR- PC GOSUB 1130, 
REM «* DAVE'S SEPARATE **♦ 



GOTO 17Q 



T3 - PC SOSUB 670: IF PC - 
PRINT HTAB 9; PRINT "NO 

1410 SCSUB L130: OOTO 170 
IF PC m B THEN PC - T3: GOTO 
PRINT D*«"PPB".SL. PRINT 
IF PC - 3 OR PC - 7 THEN 
POKE ?6?. 144 CALL 24576 
IF PC ■ 5 TM€N Tl » T2 
IF PC ■ a THEN Tl ■ T2 
POKE 76B-T1. POKE 767* T2 

BC ■ HCCLCR- 3 GQSUB 



4 W PC 

SEPARAT 



• O THEN PC i 
ON GN BLACKS. 



T3 HCOLCR- PC HCME 
'i GOSUB 1300; G0SV5 



2530 
*H2* N- ! GOSUB 
POKE 767, 176 
Tl - 138. T2 - 
' 213 
- 170 
CALL 24911 
1040. GOSUB 1330 



1330 HCDLOR- DC G0SU3 1040. 
CALL 24576 GOTO 2570 
213. IF PC - 2 THEN T2 - 1?0 



HCCLOP- PC C0SU3 1130 GOTO 170 
POINT PRINT D*--PR*"*5L 
PRINT "D-S".SF. -,H2, X", XF* h j Y"* YFj ■ 
TEXT HONE : PRIMT : HTAB 7 PRINT 

HTAB 16 PRINT "NOT EXIST " 
VTAB 7 HTAB 8 PRIWT "*tA-*E SURE THE MASTER DISK 



R.N- RETURN 

"TABL£T InFOPHATIOT^ FILE DOES" 



PRINT 



"IS SOT PROTECTED 

VTAB 14 HTAB 5: 

17 PRINT "BE RUN 
POKE 104.9. POKE 
PRINT PRINT ;* 
REM * ERROR 
TEXT HqHE 



AND" PRINT HTAB 12 PP i«T "THEN PRE5S 

PRINT -THE MENU ALIGNMENT ROUTINE WILL" 
*. : GET A* IF ASC <A»j < > 13 THEN 

103. 1 

"RUN WiNU ALIGNMENT, Dl" STOP 
HANDLER * 
T7 - PEEK 



HTAB U 
PETL«N " 

PRINT 

630 



PRINT 



PRINT 



hTA& 



f^ID PRINT 0** "PRWO 1 * IF T7 > 3 THEN VTAB 



2685 

2690 
2700 

2710 

2715 

272C 



12. HTAB 

IF T7 - 
2700 

IF T7 ■ 4 OR T7 ■ 
TURE IS LOCKED. OR 
GOTO 2700 
IF T7 « 13 THEN 
LE. ": GOTO 2700 
VTAB 12 HTAB 9 
VTAB 20 HTAB 8; 
PRINT "PRESS -CCR 
VTAB 24 HTAB 20 



16: PRINT "I/O ERROR. ■ 
a THEN VTA3 12 hTAB 



: GOTO 2700 

tl. PRINT "PICTURE HOT ON DISK. 



;to 



OR T7 o 
HTAB 5: 



10 THEN VTA8 12 
PRINT "THE DISK I 



HTAB & 
5 FULL, 



PRINT "THE PIC 
CR PROTECTED. ■ 



VTAB 12 PRINT " FILE REQUESTED 15 NCT A P[CT\P£ Fl 



PRINT -P9QBLEH — > PEEK1222)--* T7 

PRINT ''PRESS SPACE BAR TO RETRY. ■: PRINT 

TO ABORT - 

GET A* *F A# - * - THEN VTAB 20 HTAB 



HTAB 11 



CALL - 



= 59 HTAB 15 PRINT *'P£TR\ U^Q 
IF At « - - TH£N RESUME 
IF ASC 'All w 13 THEN PRINT 
GOTO 2710 



IF T7 



6 THEN GOTO 3*5 



PRINT D*. "CLOSE "-GV GQ'O 290 



VARIABLE ATLAS 



Name Description 



A5 

AK 

B$ 

B1-B6 

BC 

BX 

CS 

CO 

CM 



DS 
DX 
UF 



Ceneral-purpoMi- Input string 

Calculated area for AREA congnand 

Input string Cor picture nane In LOAD and SAVE 

Temporary variables for WINDOW 

Background Color (defaults to 0) 

Pointer into the QUICK-DRAW subroutines 

String for slot number 

Termination code of QUICK-DRAW subroutines 

Current Connand mode: 

- DRAW 

1 - LINES 

2 - DOTS 

3 - FRAME 

4 - BOX 

CTRL-D (CHR$(4)) for DOS commands 

DELTA setting (0-127; negative if Audio Feedback is off) 

Default drive number for LOAD, SAVE, CATALOG 
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DT 
DX,DY 

ES 

EPX 

GF 

B 

HF 

LT 

HX 

HD 

NX 

PC 

PI 

RD 

RT 



SO 

S2 

SF 

SL 

T1-T9 

TX,TY 

W 

WS 

WM 

X,Y 

Xi,YX 



XI, Yl 
X2,Y2 
X3,Y3 
X4,Y4 
X5,Y5 
X6 t Y6 
X8,Yti 
X9,Y9 
XA,YA 
XB,YB 
XF,YF 
XH,YH 
XL,YL 
Xrf,YM 
XT,YT 
Z 



zz 



(read from info file) 

BOX f LINES, FRAME, SLIDE) 



Calculated distance for DISTANCE command 

Temporary variables used in AREA and DISTANCE: the vertical and 
horizontal distance between a point and the next one* 
Temporary input string for SAVE 

The beginning address of the QUICK-DRAW subroutines 

X screen offset values for WINDOW 

Widely used as a temporary variable* 

Y screen offset values for WINDOW 

Length of menu. In Tablet units 

Maximum number of points for DISTANCE or AREA calculation 

Height and width of each menu command square, in Tablet units 

Index into arrays XX and YZ, used by QUICK-DRAW 

Pen color (0-7), defaults to 3 (white) 

Number of points per Inch on the Tablet 

Flag for REDUCER mode: 1-on, 0-off- 

A return flag for LINES, DOTS, FRAME, and BOX modes whose value 

indicates the phase of the operation: 

- Operation was just initialized- 

1 - Menu selected; operation cancelled* 

2 - Operation in progress* 
Scale setting for menu 

Scale setting for WINDOW after LOAD 

Scale Factor — see XF,YF 

Slot number of Tablet Interface card 

Temporary variables 

Temporarily holds an X,Y position {for 

User CALIBRATE units 

Name of user CALIBRATE units 

CALIBRATE multiplier (WH- Tablet units / W) 

General-purpose coordinate pair for high- resolution screen 

Arrays (of length MX) which hold coordinates of points plotted 

in DRAW, AREA, and DISTANCE* They are filled by the 

QUICK-DRAW subroutines. 

Coordinates for upper-left corner of WINDOW on Tablet 

Coordinates for lower-right corner of WINDOW on Tablet 

Coordinates for upper-left corner of VIEWPORT on screen 

Coordinates for lower-right corner of VIEWPORT on screen 

Default values for XI, Yl 

Default values for X2,Y2 

Temporary X,Y coordinates (for VIEWPORT and color menu) 

IT II II It 

Width and height of menu overlay 

Coordinates for lower-right corner of WINDOW on screen 

Current Tablet offset factors 

Coordinates for upper-left corner of overlay on Tablet 

Coordinates for lower-right corner of overlay on Tablet 

Coordinates for upper-left corner of working area on Tablet 

Coordinates for upper-left corner of WINDOW on screen 

Pen up /pen down value: 

= pen is down, and has been down* 

1 ■ pen is up 

2 * pen newly down 
10 » pen Is off-scale 

Negative numbers indicate that a key has been pressed. 
Temporary variable used In delay loops. 



* 



SUBROUTINES 



Entry Description 



C 1 



530 
670 

nrio 



1 040 
1070 

1 090 



c 


4 


1120 
1130 


tF 


4 


1280 
1290 


* 4 


1 300 
1310 




* 


1 330 
1 350 




4 


uoo 

1940 


E 


4 


1990 


m 


«■ 


2090 


m 


4 


2120 


m 


4 


2300 
2310 


e 


4 


2320 
2590 



* « 




WINDOW 
and falls 



if active) 



Inputs drive number from keyboard 

Displays color menu; returns chosen color in PC 

Draws a single box of the color C9 on the low-resolution 

graphics screen. The box will be X8 blocks tall, and its 

upper-left corner will be at (X9, Y9). 

Draws the WINDOW on the high-resolution screen in the 

current HC0L0R- 

Sets scaling information for Tablet; falls into subroutine 

at 1090 

Turns off REDUCER, reiooves WINDOW frame and sets 
to its default values, resets CALIBRATE setting, 
into subroutine at 1120 

Stores VIEWPORT setting In memory for QUICK-DRAW 
Resets Tablet scaling information (with REDUCER, 
Prints prompt "LOWER-RIGHT?" 
Prints prompt "UPPER-LEFT?" 
Delay 1.1 seconds 

Wait for the pen to be down or a keypress* If pen is down, 
return with coordinates in X,Y; if keypress, return with Z<0. 
Draws or undraws the four VIEWPORT corner marks. 
Draws or undraws a single VIEWPORT corner mark. The corner's 
coordinates are in X8,Y8 and the rotation factor is in H* 
Turns on the REDUCER. 

Returns with RT-1 if the last pen press was in the menu area; 
otherwise displays "POINT OUTSIDE VIEWPORT. RESPECIFY" 
Performs an AREA calculation on the polygon whose vertices 
are in the arrays XX, YX. Returns with the area In AR. 
Performs a DISTANCE calculation on the closed curve whose 
points are in the arrays XX, YX- Returns with the distance 
in DT. 

Adds the value of DT to the end of string BS, and prints it 
centered on the screen- 
Clears out the bottom four lines of the Page 2 Text screen. 
Displays the prumpL "BEGINNING POINT?" 
Displays the prompt "ENDING POINT?" 

Reinitializes the Tablet with the scaling factor in SF, the 
X-offset In XF, and the Y-offset in YF. 
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SPECIAL LOCATIONS 



fc d 



These special memory locations ate used by the TABLET-CODE 
APPLESOFT program. The decimal addresses are given on the left; 
hexadecimal equivalents are in parentheses and preceded by a dollar 
sign <$): 



Location 
41 (S29) 



103,104 
(S67,$66> 



222 (SUE) 

232,233 
(5E8.SE9) 

700 (S2BC) 



752,753 

(S2F0.52F1) 



766,767 

<S2FE,S2FF) 

3089-3094 
(SC11-5C16) 

16632,16633 

(540F8.540F9) 



16504-165U 

(54078-S407F) 



24576 (S6000) 



This location contains the high part of the memory 
address of the beginning of the current line on the 
Text screen* A POKE 41* PEEK(41)+4 operation will 
cause the next printed line to appear on Page 2, 
rather than Page 1. of Text mode. 

This pair of locations holds the address of the 
beginning of the current Applesoft program in 
memory. 






This location holds the ON ERR GOTO code of 
last error generated* 



che 



This pair of locations holds the address of the 
beginning of the current shape table for the 
Applesoft DRAW and XDRAW connands* 

Holds the termination code from the QUICK-DRAW 
subroutines* 

After the QUICK-DRAW program is RUN, this pair 
of locations will hold the memory address of the 
beginning of the QUICK-DRAW subroutine- 

These locations are used to pass the selected 
color to the SEPARATE subroutine* 

These locations are used to pass VIEWPORT information 
to the QUICK-DRAW subroutine. 

These locations are in the memory range used by the 
hiftli-reBolution graphics Page 2, but their contents 
are neither displayed on the screen or affected by 
normal screen operations. These two locations are 
used to store the value of S2 during a SAVE* 

These are also locations in the high-resolution Page 2 

which are not displayed* These eight locations are 

used to store the values of XI, X2 t Yl» and Y2 during 
a SAVE. 

This is the entry point for the machine language 
subroutine which performs a SEPARATE. 
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4 

1 

4 






24911 (Sbl4F) 
23175 ($6257) 

25218 (S6282) 
2526] (S62AD) 
. ■ 108 (362DC) 
-16368 (SC010) 

62454 (§F3F6) 
-958 ($FC42) 

-868 (SFC9C) 



This is another entry point for SEPARATE. 

Entry point for a one-dot SLIDE down* 

Entry point for a one-dot SLIDE up. 

Entry point for a 14-dot SLIDE right* 

Entry point for a 14-dot SLIDE left* 

A PEEK or POKE to this location will clear the Apple's 
keyboard strobe , causing any recent keypress to be 
ignored* 

This subroutine in the Applesoft ROM fills the entire 
high-resolution screen with the most recent HC0L0R 
plotted* 

This subroutine in the Apple's Monitor ROM clears the 
text screen from the current cursor position to the 
end of the screen* 

This subroutine in the Apple's Monitor ROM clears the 
text screen from the current cursor position to the 
end of the line* 



ROM CODE 



flO^HCC FILE: 


DITPAD33 IP 






*OU*CE FILE: 

OOOO 

oooo 


BITPAD33 2P 






2 


* 






OOOO: 


a 


• 






OOO0 


4 


» 


BIT PAD 


FIPMUARE 


OOOO 


3 


* 






00<K> 


6 


• copyright 


APPLE COMPUTE* 


0000 


7 


• 7/30/79 




0000 


B 


• U 


: SANDER 




0000 


9 


* 






0000 
0000 
0024: 


10 
11 

12 


► 






CM 


EOU 


424 


0O2A 


12 


HOASL 


eou 


42A 


ooro 


I A 


HflASH 


cou 


423 


■02G 


13 


BASL 


EOU 


428 


0034 


16 


COUTL 


E0U 


436 


0037 


17 


COUTH 


COU 


427 


0M0 


13 


I NO 


EOU 


4200 


0201 


19 


INI 


SOU 


4201 


ora 


20 


IN2 


EOU 


4202 


MM 


21 


INS 


EOU 


4203 


.,. o 


22 


TEM 


EOU 


4280 


OOOO 


23 


• .HI 


GH NI2ELE - l«ftCTUflN Si 


0000 


24 


* 'LOW 


NIBBLE 


- 0*PEN DOWN. 


'-HI 


29 


XFLL 


ecu 


4281 


• r *■ 


26 


XF\M 


ecu 


4282 


oata 


27 


YFLL 


EOU 


4283 


0284 


28 


YFLH 


EOU 


4284 


0285 


29 


TEKXL 


EOU 


4285 


)^*I6 


30 


TEMX 


EOU 


4286 



.SCREEN HORIZONTAL 
I BASE ADDRESS FOR J 



POSITION 
HTpaO CURSOR 



. TEXT BASE ADDRESS 
.LOW BYTE OF CGUT POINTER 
-HIGH BYTE OF COUT POINTER 

i INPUT BUFFER ADDRESSES 



RETURN FLAG LOCATION 
SCALED VALUE 
1=PEN LIFT. 2-PEN FALL. 3-PEN UP 
i X-COORD LOU BYTE. FULL SCALE 
i X-COORD HIGH BYTE. FULL SCALE 
* Y-COORD LOU BYTE. FULL SCALE 
iY-CQORD HIGH BYTE, FULL SCALE 
. X-COORD LOU BYTE, SCALED 
i X-COQRO HIGH BYTE* 5GALXD 



HV 



0287 
0288 
0287 
0298 
02*0 
02*8 
0299 
029B 
02A0 
C2A1 
02A2 
Q2A3 + 

02 A4 

C2AS 

03G8 

0000, 

0000 

0000: 

0000 

0000: 

0000. 

000O 

co<ra 

0000 

OOCO: 

OOOO: 

0000 

0000 

0438. 

0000: 

0000: 

0000 

OOCO 

0000 

0488 

0338 

05B8 

0438 

06 B8 

0738 

0678 

0378: 

O5F0. 

02 A5 

0*F8 

07F8 

COOO 

coio- 

COW 

COM 

C052: 

C053 

COM 

C055 

C056 

C057- 

C051, 

CC80 

C083: 

C0B2 

CFFF 

FE93 

PDED 

FF58 

0000; 

0000; 

0000: 

0000 

0000: 

0000: 

0000: 

0000: 

0000 

oooo 



36 
37 



31 TEPtVL 

32 TOW 

33 REGL 

34 RECH 
33 IMA 

!NX 
nFLaG 

38 SAVSLOT 

39 HI FLAG 

40 GREGL 

41 OREQH 

42 DIVL 

43 DIVH 

44 CiHAP 

45 PACE 

46 • 
47 

48 
49 

50 
51 
52 
33 
54 
53 
5* 
57 



EGO 
EGU 
EOU 
EOU 
EOU 
EOU 
EGU 
EOU 
EOU 
ECU 
EOU 
EGU 
EOU 
EOU 
EOU 



♦287 
»288 
♦287 
*238 
*290 
♦298 
*299 
«98 
*2A0 
•2 A I 
S2A2 
t2A3 
• 2A4 
*2A5 
(3B8 



. V-CCOffD LOU BYTE, SCALED 
iV-COORD HIGH BYTE. SCALED 
.DIVIDE REGISTERS 

* BUFFER REGISTER F« PR* SYNTA> 

*PRB BUFFER POINTER 

, PR* BUFFER STATUS FLAG 



* j 



PACE CODE 



59 

60 
61 
62 
63 

64 

65 
66 
67 
68 
69 
70 
71 
72 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
83 
Q4 
85 
86 
87 
88 
89 
90 
91 
92 
93 
94 
96 
97 

98 

99 
1 00 
101 
102 
103 
104 
(03 



• HIGH 
» 40 - 
» 20 ■ 

• 08 - 

* 04 - 

* 02 » 

* 01 ■ 

# 42 * 

* 21 ■ 

• OA - 

• 03 - 
* 
KPACE 



BIT » 1 MEANS 

HIRES PA0E2 
HIRES PAGE1 
TEXT PAGE2 
TEXT PAGE1 
LORES PAGE2 
LCRES PAGE1 
HIRES MIXED PACES 
HIRES MIXED PAGE1 
LORES MIXED PAGE2 
LOSES MIXED PAGE1 

£0V «438 



aCALE DATA 



LAST SIX BITS OF WAGE CORRESPOND TO PACE 

BIT 7 MEANS STREAM MODE IF 1 

BIT 6 MEANS OFFSET AFTER SCALE IF 1 



SCALL 

SCALH 

OFFXL 

OFFXH 

OFFVL 

OFFVH 

HNDX 

TEMPL 

TEMPH 

COUNT 

CHAR 

MSLOT 

KOD 

KBDSTRB 

SGR 

STEXT 

5NMIX 

SMIX 

SPAGI 

5PAG2 

SLOPES 

SHIRES 

OEVO 

OE'/l 

0EV2 

DEV3 

ROMSW 

5ETVID 

COUT 

I CRTS 



EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EOU 
EOU 
EGU 
EOU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EGU 
EOU 
EGU 
EGU 
EGU 
EGU 
£-.:-'.' 



*4Q8 

• 538 
«5B8 
♦638 
•638 
»738 
•678 

• 578 
*5F8 
»2A5 

• 6F8 

• 7F8 
•COOO 
•COIO 
•C050 
•COM 
«C032 
•C053 
•C054 
•C055 
♦C056 
•C037 
•C081 
•C080 
♦C083 
•C082 
•CFFF 
•FC93 
tFDED 
•FF38 



LOW BYTE OF SCALE FACTOR 
HIGH BYTE OF SCALE FACTOR 
LOU BYTE OF X-GFFSET 
HIGH BYTE OF X-QFFSET 
LOW BYTE OF YH3FFBET 
HIGH BYTE OF Y OFFSET 
T£NP INDEX FOR CURSOR PLOT 



UTILITY COUNT REG 
TEMPORARY CHARACTER 5T0PE 
CURRENT SLOT POINTER *CN 
> KEYBOARD STROBE 
I KEYBOARD STROBE RESET 
DISPLAY MODE REFERENCES 



•BITPAD DEVICE ADDRESSES 



HEFERENCE ADDRESS TO FREE »C300 i 
♦ SET CHARACTER OUTPUT TO NORMAL 

I CHARACTER OUTPUT 

.UTILITY LOCATION CONTAINING RT' 



CNOO ROM ENTRY 

FLAG SCT-UP C CLEAft FOR IN* ENTRY 

C SET FOR POINT RETl*N (CURSOR) 

CMOO ENTRY CODE REPLICATED FOR EACH 

N FROM 9 TO F (CORRESPONDING TO 1 TO 7* 



90 



m n 


oooo 

OOOO: 
OOOO 


107 
108 
109 


• 

* CSOO SPACE ENTRY 




OOOO 


mo 


• 






W~4 


OOOO: 


ill 


• GET SLOT NO. 


SAUE MSLQ 


OOOO: 

OOOO 


112 
113 


• AND SET DEFAULTS 




OOOO 


114 








KT ~d 


~ NEXT OBJECT FILE NAME 


IS XX 




ff' ■ 


C800: 


US 




ORG 


♦C800 




OOOO: 


116 




OBJ 


•6000 


E- n 


CBOO: 6D A3 02 
C803 68 
C 804 68 


117 
119 
119 


QTHROM 


BTA 
PLA 
PLA 


C1HAR 




CS05: 28 


120 




PLP 




& j 


C806: 50 01 

C BOB: 60 


121 
122 




DUC 
RTS 


AOTHROM 




C809.8D F0 07 


123 


AOTHROM 


3TA 


MSLOT 


W 4 


csoc-bd n 02 


124 




STA 


SAVSLOT 


C80FA0 A5 02 


125 




LDA 


C1HAR 




C812: 6D F8 06 


126 




STA 


CHAR 


* a! 


C813 49 
C816: 8A 
CS1748 


127 
128 
129 




PHA 
TXA 
PHA 






C81898 


130 




TYA 




G I 


CS19 48 


131 




PHA 




C81A: 08 


132 




PHP 






C81B AE F8 07 


133 




LDX 


MSLOT 


* H 


C81EB0 38 04 
CSS 1:49 25 
C823 5D 38 03 


\2-\ 
135 
136 




LDA 
EOR 
EOR 


MPAGEi X 
•B25 

PACE. X 




0826:29 3F 


137 




AND 


• f3F 


E i 


C828: FO 03 


138 




BEG 


PRCMK 


C82A 30 90 CE 


139 




jsn 


DEFAULT 




C82D £4 37 


140 


PRCHK 


CP* 


COUTH 


* + 


C82FD0 03 


141 




BNE 


NOPR 


C831; 4C AD CC 


142 




JW> 


SYNTAX 


C834 28 


143 


NOPR 


PLP 




m =s 


C835 08 


144 




PHP 




C 836 BO 07 


145 




DCS 


EPOINT 


C838AD F8 06 


146 




LDA 


CHAR 




CB3B: A4 24 


147 




LDV 


CH 


fe -* 


C83D 91 28 
C83F 


148 
150 




STA 


<BASL). Y 


■r -4 


C83F 
CB3F 
C83F 
CS3F 
C83F: 


151 

152 
153 
154 
155 


• 

• MAIN LOd» ENTRY 


m 4 


C83F; 


156 








C83F20 09 CB 


157 


EPOIMT 


JSR 


rtREAD 




CM2l3C 00 CO 


158 




BIT 


K8D 


€ -* 


C845 30 26 


159 




BMI 


END 


CB47 AD 80 02 


160 




LDA 


TEM 




C84A: 29 03 


161 




AND 


»«3 


BC=a 


CB4C:C9 03 
C84E: DO ID 
C 850 AC F8 07 


162 
163 

164 




CMP 

DNE 
L&Y 


«t3 
END 

MSLOT 




CB53 B9 B8 03 


165 




LDA 


PAGE* Y 


r * 


C 856 29 7F 


166 




AND 


•*7F 


C858 FO OE 


167 




BEG 


E1PNT 




C85A 20 FO C8 


168 




JSR 


CURSOUT 


r j 


C050 A9 60 


169 




LDA 


««60 


C05F 20 Al CC 


170 




JSR 


GUAIT 


C862: 20 FO C8 


171 




JSR 


CURSOUT 




C865 AC F8 07 


172 




LDV 


rtSLOT 


C 868:89 38 04 


173 


E1FNT 


LDA 


rtPACE. Y 


CB6B 10 D2 


174 




OPL 


EPOINT 


■ -1 













•SAVE ACCUff FOR PR« ROUTINE 
iPULL RETURN VECTOR TO 
I GET SLOT NO. 



t SAVE SLOT NO. 



-SAVE ACCUM 

;SAVC X-REO ANO Y-ff£G 



.SAVE STATUS 

-COAD X FOR SLOT DEP VABS 



I IF SO THEN NO DEFAULT 

* CHECK IF FROM PR» 

IF SO' THEN TAKE IN COMMANDS 

* RECOVER STATUS 
i AND SAVE 



• EL1M FLASHING CL'ftSG* 



. READ BITPAD 



I CHECK IF PEN DOWN 



>EXIT IF PEN DOWN 



I DRAW CURSOR 

.LEAVE CURSOR ON FOR AWHILE 
.THEN DELETe CURSOR 



91 



C06D 






174 


CSoO 






177 


C3*0 






179 


C3&D 






179 


C36D 






180 


CQftD 






191 


C36D 






132 


C8*D A2 


03 




183 


CS6F BD 


81 


02 


184 


C572 9D 


85 


02 


1SS 


£873 CA 






186 


C376 10 


F7 




187 


C37B a£ 


F8 


07 


139 


C87Q BD 


09 


03 


199 


C37E 10 


03 




190 


C€60 20 


70 


C8 


191 


C 383. SB 






192 


CS84 90 


06 




193 


C826: 69 






194 


C3S7 AS 






193 


C38B 68 






196 


CSS9 A A 






197 


C38A 68 






198 


CSSBr 60 






199 


C38C: 






200 


C3SC 






201 


case 






202 


C39C: 






203 


C88C A9 


30 




20* 


C3BE: AO 


OE 




203 


C890 99 


00 


02 


206 


CS93: 88 






207 


C894 10 


FA 




203 


C896, A9 


AB 




209 


C 898:80 


00 


02 


210 


C89B 80 


0-> 


02 


211 


C39E 90 


oc 


02 


212 


C8A1: A9 


AC 




213 


C3A3 8D 


03 


02 


214 


C8A6; 90 


03 


02 


215 


C8A9: AO 


30 


02 


216 


C3AC.29 


10 




217 


CMCiDO 


16 




218 


C3S0 AD 


93 


02 


219 


C8B3; AC 


86 


02 


220 


C336: A2 


OO 




221 


CAM: 20 


SA 


CA 


222 


C3&BAD 


87 


02 


223 


C8BE AC 


99 


02 


£24 


C8C1 A2 


06 




223 


CBC3 20 


6A 


CA 


226 


C3C6 SC 


00 


CO 


2Z~? 


C8C9: 10 


03 




228 


C8CB A9 


AO 




229 


ceco.eo 


OC 


02 


230 


caoo ad 


80 


02 


231 


C8D3 43 






z:2 


CSD4 29 


OF 




233 


C8D6 09 


50 




234 


C8D8: 80 


oe 


02 


233 


C3DB: 68 






236 


C8DC 4 a 






237 


C3DD: 4A 






238 


C3DE, 4 A 






239 


C3DF 4 A 






240 


C8E0 29 


OF 




241 


C8E2: 09 


00 




242 


C8E4; 80 


OD 


02 


243 


CBE7 A8 






244 


C8E6 68 






245 


C9E9 68 






246 


C8EA: ©8 






247 


C8EB: A2 


OF 




248 


C8ED: A9 


80 




249 


C9EF 60 






230 



* EXIT ROUTiNES 

* 

END LDX #»3 

INEX1 LOA XFLL. X 

STA TEMXL, X 

DEX 

DPL I ME XI 

LDX KSLOT 

LDA PACE. X 

3PL INEX2 

JSR SCALE 

INEX2 PLP 

occ i rex IT 

EXIT PLA 

TAY 

PLA 

TAX 

PLA 

RTS 
* 
» SET INPUT BUFFER TO +0000. ♦OOOO. +00 

INEXIT LDA 4490 

LDY tttE 

CLQOP STA INO, Y 

DEY 

BPL OLOOP 

LDA HSAQ 

STA »200 

STA »2Q6 

STA *20C 

LDA #*AC 

STA *205 

STA »20Q 

LCA TEH 

AND H410 

SNE ASCEX 

LDA TEMXL 

LDV TEHX 

LDX 11*0 

JSR ASCON 

LDA TEMVL 

LDV TEMV 

LDX #«6 

JSR ASCON 

ASCEX BIT KBD 

BPL ASC1EX 

LDA itAD 

STA *20C 
ASC1EX LDA TEM 

PMA 

AND *%Ot 

ORA H4B0 

STA *?0€ 

PLA 
LSR 

LSR 
LSR 
LSR 

AND 
ORA 
STA 
TAV 
PLA 

PLA 
PLA 
LDX 
LDA 



COPV RESULTS TO TEH REGISTERS 



TEST HIGH BIT DF 'PAGE ' TO 

SEE IF DATA 15 TO 3E 5CALED 
SCALE AND OFFSET DATA 1NTQ TEH-R 
SKIP TO FURTHER PROCESSING 



.RESTORE REGISTERS AND EXIT 
IF NOT FROM IN* 






* * 



* + 



-CONVERT X 

< IN INPUT 



TO ASCII 

PUFFER 



4 



I CONVERT Y TO ASCII 
IN INPUT BUFFER 




SET UP RETURN FLA$ IN INPUT 5UF*-' 



L. 



A 
A 

A 
A 

H*OF 

IfttBO 
*20D 



#»CF 



*PULL STACK AND SET UP 
.REGISTERS FOR END DF LINE 



mhi 



92 



»> 



C3F0: 

C8F0: 

C3F0 

C8F0 

C8F0 

C8F0 

C3F0: 

C8F0, 

C8F3 h 

C900; 

C900: 

CfOl: 

C902: 

C903: 

C904 

C903: 

C906: 

C909: 

C90C 



20 
4C 

18 
BO 
38 
B8 

00 
78 
2C 
20 

A3 



OC 






FF CF 
OO 03 
2A 



C90E.46 



AD 

A£ 

20 
48 
00 

20 



C*OF 

C911 
C9J2 

C913 

C918 

C9iB 

C9IC 

C91E, 

C921 

C92| 

C92I 

C921 

C921: 

C921 

C924 

C926 

C927 

C929 

C92B 

C92C 

C92E 

C930 

C931 

C932 

C934 90 

C*36 

C936: 

C936 

C936: 

C936 

C936 

C937 

C93A 

C93C 

C93D 

C93F 

C941 

C943 

C946 

C947 



A3 20 



29 

AS 

29 
FO 
98 
29 
FO 
69 
48 
C9 



98 



48 
A9 

91 

A9 

20 
68 
91 



C949 A9 
C94B 20 

C94E 
C951 
C952 
C954 
C936 
C958 
C93A 
C93A 
C95A 
C93A 
C95A 
■*™ 



87 02 
85 02 
4C CA 

30 
FO C9 



88 03 
7F 

OC 
26 

63 

06 



AO 



CE 

2A 



C9 



OF 
2A 

SO 
At CC 



4C 

90 

C9 
SO 
A3 
29 



2A 

60 
Al 
00 

OF 
IB 
20 
10 



CC 
C9 



232 *****••»*•*•*»•»**»* 

253 **•**#* 

254 * 

255 • CURSOR ROUTINE 

256 • 

237 « wim 

238 ••*#•*•*•♦ ••«»# 

239 CURSOUT JSR SCALE 

260 JMP C1SKP 

261 ORO *10O»OT>#0M 

262 INPUTXY CLC 

263 OFB COO 

264 POINT SEC 
263 CLV 

266 PHP 

267 S€I 

268 B I T ROttStJ 

269 JSR QTHROn 

270 C1SKP LDA HDASL 

271 PMA 

272 LDA HBASH 

273 PHA 

274 LDA TEMYL 
273 LDX TEMXL 

276 CALLCURS J5R UINCHK 

277 PHA 

278 BCS 0UT1 

279 JSR BASCLC 

280 ■ !■■ ***** * » ■ 

281 * 

282 • hODE EVALUATION 

283 • 

2B4 «*••#♦••*••****••*•••**«» 
283 LDA PAGE. Y 

TQ6 AND #*7F 

287 TAY 

288 AND **0C 

289 0£0 OR 

290 TYA 

291 AND 11*63 

292 OEO TEXT 

293 MIX PLA 

294 PHA 

295 CMP H160 

296 OCC OR 

297 *»»»••**•«»••••*•«««••««*• 

299 • 

299 • TEXT HODE CURSOR GENERATION 

300 * 

301 fl«MMIH«ffHMi«4«*«««MM 

302 TEXT TVA 

303 JSR LOCLC 

304 LDA IHBASLK Y 

305 PHA 

306 LOA **QF 

307 STA <H3ASLKY 

308 LDA ««B0 

309 JSR SUA IT 

310 PLA 

311 STA <HBASL>,Y 
LOA *«60 
JSR CMAIT 
JMP OUT 
TYA 
CMP 
BCS 
LDA 
an.;. 



i CARRY SET FOR IN» ENTRY 

i SKIP NEXT BYTE 
SET CARRY FOR ENTRY TO GET A POT. 

>SAVE FLAGS FOR LATER 

iOI5A3LE INTERRUPT UNTIL MSLOT %t 

-SWITCH OFF ALL 4C800 ROMS 

-switch to tceoo space 



-MIXED GRAPHICS BOUNDARY TEST 



312 
313 
314 
313 
316 
317 
318 
319 
320 
321 
322 
323 
324 
323 



OUT I 
OR 



TEST FOR HIRES ^ LORES GRAPHICS 



• *OF 
HIRES 

HBASH 

ttio 



*»**»**4* 



LO RESOLUTION GRAPHICS 
CURSOR ROUTINE 



93 



C95A.08 




326 LCtfES 


P* 




C93D A9 FO 




327 


LDA 


•*F0 


C95D: 28 




328 


PLP 




C95E, DO 02 




329 


SUE 


L0R1 


C960: 49 FF 




330 


EGA 


MFF 


C962 48 




331 L0R1 


PHA 




C963 98 




332 


TVA 




C964 OA 




333 


AfiL 


A 


C965 OA 




334 


ASL 


A 


C946: 20 DC 


C9 


335 


JSR 


LOCLC 


C969.66 




336 


PLA 




C96A 3 1 2 A 




337 


£0P 


(HBASL*- V 


C96C:91 2A 




338 


STA 


< HBASL) - Y 


CQ&E: 4C DO 


C9 


339 


jhP 


OUT 


C971: 
C971: 












341 * 






C971: 




342 • HIRES 


CURSOR 


ROUTINE 


C971: 
C971: 
C971;A9 16 




343 » 








345 HIRES 


LDA 


i*16 


C973 8D A3 


02 


346 


STA 


COIWT 


C976 8A 




347 


TXA 




C977.38 




348 


SEC 




C978 £9 03 




349 


SBC 


#•5 


C97A AA 




350 


TAX 




C97B BO 03 




351 


DCS 


LOOP 


C97D CE 66 


02 


352 


OEC 


TEHX 


C*30 AO 05 




353 LOOP 


LDV 


**3 


C 962 AD A3 


02 


354 


LDA 


COUNT 


C98S: D9 D8 


C9 


355 CTRLDOP 


CMP 


CTRCHK, Y 


C988;F0 14 




356 


8E0 


OUTSIDE 


C9SA 88 




357 


DEY 




CQ8B: 10 F8 




358 


BPL 


CTRLOOP 


CC9D 68 




359 


PLA 




C96E20 4C 


CA 


360 


JSR 


UINCHK 


C991 48 




361 


PHA 




C992 30 OA 




362 


BC5 


OUTSIDE 


C994 20 FO 


C9 


363 


JSR 


BASCLC 


C 997 AC 78 


06 


364 


LDY 


HNDX 


C99A 51 2A 




365 


EDR 


<HBASL)i Y 


C99C 91 2A 




366 


STA 


< HBASL K Y 


C99£ A9 OC 




367 OUTSIDE 


LDA 


••C 


C9AO CD A3 


02 


368 


CMP 


COUNT 


C9A3 FO oe 




369 


DEO 


A 


C9A5 BO 10 




370 


DCS 


B 


C9A7 EB 




371 


INX 




C9A8 DO 03 




372 


BNE 


C 


C9AA- ££ 86 


or 


373 


INC 


TEMX 


C*AD: CE A5 


02 


374 C 


DEC 


COUNT 


C930 4C 80 


C9 


375 


JHP 


LOOP 


C9B3 8A 




376 A 


TXA 




C9B4 £9 05 




377 


80C 


■•5 


C9B6 AA 




378 


TA* 




C9B7 AD 96 


02 


37* 


LDA 


TEHX 


C9BAE9 00 




380 


SBC 


-* 


C9BC 80 86 


02 


381 


STA 


TEHX 


C9SF 68 




392 


PLA 




C9C0 38 




383 


SEC 




C9C1 E9 06 




384 


SBC 


tt«6 


C9C3 46 




333 


PHA 




C9C4 68 




386 B 


PLA 




C9C3: 18 




367 


CLC 




C9C6;69 01 




398 


ADC 


Ml 


C9C8: 48 




389 


PHA 




C9C9 CE A5 


02 


390 


DEC 


COUNT 


C9CC FO 02 




391 


BEG 


OUT 


C9CE; DO BO 




392 


BNE 


LOOP 


C9D0 68 




393 OUT 


PLA 




C9D1: 68 




394 


PLA 




C9D2 85 28 




395 


STA 


HBASH 


C9D4 66 




396 


PLA 




C 905:85 2A 




397 


STA 


HBA8L 


C*D7: 60 




398 


RT3 





* I 

f : * 

v * 

f * 

r i 

f ■* 









C9P8 12 






39*? 


CTRCHK 


DFD 


*12 




C9D9 It 






400 






DFD 


• 11 




C9DA 10 






401 






DFB 


»10 




C9DD:07 






402 






DFB 


#7 




C9DC 06 






403 






DF8 


M 




ODD 03 






404 






DFB 


•5 




C90C 






403 


. - *#« •*•«•« + > - . . * * ** * 




C9DE 






406 


• 


TEXT 


BASE CALC 




C9DE. 






407 


• 










C«C€ 






408 


+ 


THIS 


SUBROUTINE SETS 


UP BASE REGISTER 


C9DE 






409 


* 


FOR LORES OR 


TEXT 




C9D£ 






410 


• 


ENTEK 


! WITH ' 


PACE' IN 


A — 


C9DE- 






4lt 


• 


EXIT 


WITH HNDX IN V. 


READY FOR SCREEN PROCESSING 


C9DE: 

C9DE: 
C9DE. 48 






4X2 
413 
414 


• 














LOCLC 


PHA 






C9DF A3 


2B 




413 






LDA 


HBASH 




C«l:29 


03 




416 






AND 


«3 




C9E3 85 


2D 




417 






STA 


HBASH 




C9£3 68 






416 






PLA 






C9C6 29 


OC 




419 






AND 


ft«OC 




C9E9:03 


28 




420 






ORA 


HBASH 




C9£A: S3 


28 




421 






STA 


HBASH 




C9EC: AC 


78 


06 


422 






LDY 


HNDX 




C9EF: 60 

C9F0 

C9F0. 






423 
425 
426 






RTS 




u u u u 






• 






********* ^-^^r » 


C9F0: 






427 


* 


SCREEN 


ADDRESS CALC 


C9F0 






428 


* 










C9T0 






429 


* 


ENIER 


: WITH LO BYTE OF 


Y IN ACCUM 


C9F0; 






430 


1 


AND UI1H LO 


BYTE OF X 


IN X-RE3 


C*fO 






431 


* 










C9F0 






432 


* 


BASE 


ADDRESS 


WILL BE 


COMPUTED INTO 


C9F0 






433 


ft 


HBASL 


. HBASH, 


AND HNDX 


HIRES BIT ADRESSED 


C9f0 






434 


• 


IS flETUrtWEI 


AS A 1 IN 


A BIT IN THE ACCUH 


C9F0: 
C9F0: 
C9F0 48 






435 
436 
437 


* 














BASCLC 


PHA 






C9F129 


CO 




438 






AND 


MCO 




C9F383 


2A 




439 






STA 


HSASL 




C9F5: 4A 






440 






LSR 


A 




C9F6: 4A 






441 






LSP 


A 




C9F7 05 


2A 




442 






ORA 


HBASL 




C9F9 83 


2A 




443 






STA 


HO ASL 




C9FB 66 






444 






PLA 






C9FC:4C 


OC 


CA 


445 






JMP 


C2SKP 




CAOO: 






446 






ORC 


•200+OTHROM 


CAOO: 16 






447 






CLC 




, »C200 SPACE ENTRY 


CA01: BO 






448 






DFB 


MO 




CA02 38 






-49 






SEC 






CA03 88 






450 






CLV 






CA04: 08 






451 






PHP 






CA03: 78 






452 






SEI 






CA06. 2C 


FF 


CF 


453 






BIT 


ROrtsw 




CA09 20 


00 


C6 


434 






JSR 


OTKW 




CAOC : 63 


28 




455 


C2S 


STA 


HBASH 




CAOE OA 






456 






ASL 


A 




CAOFOA 






457 






ASL 


A 




CA10: OA 






456 






A5L 


A 




CAM 26 


28 




459 






RCL 


HBASH 




CA13: OA 






460 






ASL 


A 




CA14 26 


2B 




461 






ROL 


HBASH 




CA16 OA 






462 






ASL 


A 




CA17 66 


2A 




463 






ROT 


HBASL 




CA19 A3 


28 




464 






LDA 


HOASH 




CA1B 29 


IF 




465 






AND 


HftlF 




CAID 93 


2B 




466 






STA 


HBASH 




CA1F 0A 






467 






TXA 






CA20 AC 


86 


02 


468 






LDY 


TEHX 




CA23 CO 


00 




469 






CPY 


••0 




CA23 FO 


05 




470 






DEQ 


MP0SH2 




CA27 AO 


23 




471 






LDY 


• 423 




CA29 69 


04 




472 






ADC 


• 44 





94 



95 



CA23 

CA2C 

CASB 

CA30 

CAM: 

Ca35 

CA36 

CA38 

CA39 

CA3A 

CA3B 

CA3D 



ca 

£9 
30 
69 
QC 
A8 
A9 
38 
2A 
88 
DO 
AC 



B9 

05 
85 
63 
60 



CA40 
CA41 

CA44 

GAM 

CA40 

CA4A 

CA4B 

CA4C 

CA4C; 

CA4C. 

CA4C 

CA4C 

CA4C: 

CA4C + 

CA4C 

CA4C 

CA4C 

CA4C 

CA4C 

CA4C. 

CA4C. 
CA4D 

CA4F 
CA51 
CA54 
CA56 
CA58 
CA5A 
CAM 
CA5D 
CA5F 
CA62 
CAo4 
CA*>5 

CA&6 60 

CA67 38 
CAM 

CA*9 
CAoA 

CAfiA 
CA6A 
CAftA 
CA6A 
CA6A 
CA6A 
CA6A 

CA6A 

CA6A 

CA6B 99 

CA6C: 10 

CA&£ 

CA6F 

CA71 

CA74 

CA73 

CA77 

CA78 

CA79 

CA7C 

CA7D 

CA7E 



07 
FB 
08 
78 06 

00 



FQ 
F8 07 

B8 03 
60 



:C9 

.80 

AD 

:F0 

:C9 

: BO 

8A 

C9 

BO 

AD 

DO 

18 

66 



68 
60 



:c 
16 

86 02 
09 

02 
CD 



18 
08 
38 
03 



03 



48 



48 
A9 
9D 
63 



L2 

AD 
OO 03 



86 2A 

AA 

68 

20 



473 
474 
475 
476 
477 
478 
479 
480 
481 
482 
483 
484 
485 
486 
487 



489 
490 
491 
492 

2 
3 

4 
5 
6 
7 

9 
10 
11 
12 
13 
14 
15 
16 
17 
18 
19 
20 
21 
22 
23 
24 
25 
24 
27 
28 
29 
30 
31 
33 
34 
35 
36 
37 



hPQSNl 

HPQSNS 



CLDDP 



I MY 

SBC 
BCS 
ADC 
STY 
TAY 
LDA 
SEC 
ROL 
DEV 
8NE 
LDY 

PHA 

LDA 

AND 

ORA 

STA 

PLA 
RTS 

CHN 



*U 



• •7 
HPQSNl 

•«9 

H«DX 

>tc 



CLOOP 
"SLOT 

PAGE* Y 

**60 

HBASH 

M3ASH 



BlTPAD^r 



c 4 



+4*#*++4* -**+*-* ****** 

* WINDCU CHECK SUBROUTINE 
• 

* ENTER WITH LO BYTE OF Y IN ACCUH 

* AND LO BYTE OF X IN X-REC 

* RETURN WILL BE CARRY CLEAR IF 

* WITHIN WINDOW AND CARRY SET IF 

* GUTS IDE. 



E 4 



w * 



#****»^ 

uinchk 



r****»**#*t.** 



YES 



ND 



PHA 




cw» 


• 192 


BCS 


NO 


LDA 


T£KX 


BEG 


YES 


CMP 


••2 


BCS 


NO 


txa 




CMP 


•24 


BCS 


NO 


LDA 


TEMY 


0N£ 


NO 


CLC 




PLA 




RTS 




5EC 




PLA 




RTS 





-* 

-4 



• ASCII CONVERSION 

* ENTER WITH HKH BYTE 

* IN V-REG. LOW BYTE IN ACCUM 

• AND INPUT BUFFER OFFSET 

» IN X-flEQ 



BA 

A6 



5B ca 
2A 



39 

40 # 

41 IHHNHP 

42 ASCON 
43 

44 

45 

46 
47 
48 
49 
50 
51 
52 
53 
54 
55 



PHA 

TYA 
BPL 

PHA 

LDA 
STA 
PLA 
STX 
TAX 
PLA 
JSR 
PHA 
TXA 
LOX 



m -■* 



POSIT 

•CAD 
I NO. X 

H3ASL 



Thocon 



hBASL 



CASO' 

CA81: 

CA82 

CA83 

CA84 

CA96: 

CAS9 

CAaB. 

C*8C 

CA8D, 

CA8F: 

CA90. 
CA91; 

CA93 

CA95r 

CA96: 

CA97 

CA99, 

CA9A 

CA9B 

CA9D 

CAM: 

CAAl 

GAA3 

CAA5 

CAA6 

CAA8 

CAA9 

CAAA 

CAAC: 

CAABr 

CAAF 

CA82; 

CAB4 

CAB6: 

CAB8 

CAQA 

CABD 
CABF 
CAC1; 
CAC2 

CAC2: 

CAC2 

CAC2. 

CAC2 

CAC2; 

CAC2: 

CAC2 

CAC2 

CAC2 

CAC2: 

CAC2: 

CAC2: 

CAC2 

CAC2 

CMa 

CAC2 
CAC2 
CAC5 
CAC6 
CAC9: 

■:aca 

CACC 
CACD 
CADO 
CADI 
CAD2 
<:aD4 
CAD7 

CADQ 
CADB 

CAOC 

AM 



A3 

ee 

68 

38 

BO 03 

FE 00 02 

E9 E8 

45 



E9 03 
M 
68 
BO F3 

69 ee 

48 

90 

69 03 

A8 

68 

BO 03 

FE 01 

38 

E9 64 

BO F8 

88 

10 F5 

18 

C8 

69 64 

38 

BO 03 

FE 02 02 

E9 OA 

BO F9 

69 OA 

BO 03 

F£ 03 02 

E9 01 

BO F9 

60 



02 



AC F8 07 

48 

B9 38 04 

OA 

30 05 

68 

20 64 <3 

48 

08 

AO 00 

AD A4 02 

C8 

0£ A3 02 

ZA 

10 F9 

8D A4 02 



56 
57 
58 
59 
60 
61 
62 
63 
64 
65 
66 
67 
68 
69 
70 
71 
?2 
73 
74 
75 
76 
77 
78 
79 
80 
81 
82 
93 
84 
85 



90 
91 
92 
93 

94 

95 

97 

9S 

99 

100 

101 

102 

103 

104 

105 

106 

107 

1 00 

109 

I LO 

II I 
L12 
1 13 

U4 

115 
116 
117 
118 
119 
120 
121 
122 
123 
124 
128 
126 
127 
128 
129 



POSIT TAY 

INX 

PLA 

SEC 

DCS 

FLOOP INC 

ASA IP SBC 

PHA 

TYA 
SBC 
TAY 
PLA 
BCS 
ADC 
PHA 
TYA 
ADC 
TAY 
PLA 
BCS 
HLOOP INC 

BSHIP SEC 

SBC 
BCS 
OEY 

CLC 
I NY 
ADC 
SEC 
BCS 
JLCCP INC 

CSKIP SBC 

BC5 
ADC 
BCS 

wloop im: 
dskip sbc 

BCS 
RTN RTS 

ft* #«#«***** ^ 



A5KIP 
I NO. X 

• *E8 



»*3 



FLODP 

»*EB 



**3 



8SK1P 
INI. X 

• •64 
HLOOP 

HLOOP 



• •64 

CSKIP 
IN2, X 

• *A 

JLOOP 

••A 

DSKIP 
1N3* X 
••1 
KLOOP 



• OFFSET AND DIVIDE ROUTINE 
• 

• ENTER WITH OFFSET IN REOH 

• ANO PECL. VALUE TO SCALE IN 

• X <HICH BYTE) AND A < LOU BYTE) 

• SCALE HMTFGCff DIVISOR) IN 

• OIVH AND DIVL 

• RESULT IN REGH AND RECL 

• VALUE KAY OE -OR-32767 

• SCALE TO *32767 

• RESULT 18 TWOS COMPLEMENT 

• REMAINDER IS LOST 



• •*••*•* • • * at'* 

OFFDIV LDY 

PHA 
LDA 
ASL 
3HI 
PLA 
JSR 
PHA 

DIVIDE CLV 

LDY 
LDA 

L00P1 I NY 

ASL 

BP<_ 
9TA 



«* o • » 

MSLOT 

HP ACE, Y 

A 
DIVIDE 

OFFSET 



• •O 
DIVH 

DIVL 
A 

L00P1 
DIVH 



96 



97 



CAE1 A9 00 


130 




LDA 


1**0 


CAE3 80 6B 07 


131 




STA 


REGH 


CAC6 80 87 02 


132 




3TA 


REOL 


CAE9 68 


133 




FLA 




CAEA £8 


134 




INX 




CA£D CA 


135 




DEX 




CA£C 08 


136 




PHP 




CAEO 10 03 


137 




DPL 


POS 


CAEF 20 58 CO 


138 




JSR 


TUOCOM 


CAPS 38 


139 


POS 


SEC 




CAF3.E0 A3 02 


140 


L0OP2 


98C 


DIVL 


CAF6 48 


141 




PHA 




CAF7 6A 


142 




TXA 




CAF8 CD A4 02 


143 




SBC 


D1VH 


CAFB. AA 


144 




TAX 




CAFC: 68 


145 




PLA 




CAFO: 4C OC CB 


146 




jmp 


L0CP3 


CSOO: 


147 




or; 


S300+0THR0M 


CBOO: Id 


148 




CLC 




CB01; BO 


149 




DFB 


MO 


C902; 38 


150 




SEC 




CB03: 2D 


151 




CLV 




C904 08 


152 




PHP 




C305: 78 


133 




SET 




CB06: 2C FF CF 


134 




D1T 


romsw 


C809; 20 00 ca 


155 




JSR 


OTHROM 


CBOCsOS 


156 


L0OP3 


PHP 




CB0D:2E 87 02 


157 




POL 


REOL 


CSlO 2E 88 02 


138 




ROL 


PEOH 


CB13; 88 


139 




oev 




CB14:30 16 


160 




BMI 


FEXIT 


C316 4E A4 02 


161 




LSR 


DIVH 


CS19: 6E A3 02 


162 




ROR 


DIVL 


CB1C2S 


163 




PLP 




CB1DB0 04 


164 




BCS 


L00P2 


CB1F: 60 A3 02 


163 


L00P4 


ADC 


OIVL 


0922:48 


166 




PHA 




CB23 8A 


167 




TXA 




C824 60 A4 02 


168 




ADC 


DIVH 


CB27: AA 


169 




TAX 




C 928: 68 


170 




PLA 




CB29:4C OC CB 


171 




JMP 


LOOP 3 


C82C 28 


172 


FEXIT 


PLP 




C82D 28 


173 


DEXIT 


PLP 




CB2E: 10 OF 


174 




BPL 


EEXIT 


CB30: AO 87 02 


173 




LDA 


PEOL 


CB33 AE 68 02 


176 




LOX 


RCOh 


C 536: 20 38 CB 


177 




JSP 


TUOCOM 


C839: 8E 88 02 


178 




STX 


PEOH 


CB3C 80 87 02 


179 




STA 


REGL 


CB3F AC F8 07 


180 EEXIT 


LDY 


MSLOT 


C942: B9 3d 04 


181 




LOA 


HPACE. V 


C343:0A 


182 




ASL 


A 


CU46: 10 OF 


183 




DPL 


E1EX1T 


CB48 AD 87 02 


164 




LOA 


REOL 


CD48-AE 68 02 


18'. 




LDX 


PEOH 


C04E;20 64 CO 


186 




JSP 


OFFSET 


C85l 80 67 02 


187 




STA 


REOL 


CB54 8E 88 02 


188 




STX 


REOH 


CB5760 


189 E1EXIT 


RTS 




CB58 49 FF 


190 TWOCOM 


EOW 


MFF 


CB5A; 18 


191 




CLC 




C35B- 69 01 


192 




ADC 


••1 


C35D 48 


193 




PHA 




CB5E8A 


194 




TXA 




CB5F 49 FF 


193 




EOR 


••FF 


C861: AA 


196 




TAX 




CB62 68 


197 




PLA 




C 863: 60 


198 




RTS 




C864 38 


199 OFFSET 


SEC 




CSd5;£D Al 02 


200 




SBC 


»ECL 


CS69: 48 


201 




PHA 




C969: 8A 


202 




TXA 





F;^ 



M 






JSC3Q0 SPACE ENTRY 



F* 

F * 
F -J 



F * 

r * 

m * 

f * 

Wf •» 

F ■* 






98 






C84A CD 


A2 02 


203 






SBC 


OftEOH 


CB*D AA 




204 






TAX 




CD6E 66 




203 






PLA 




C14F 60 




206 






RTS 




CI70 




208 


# **** ••• • * • * * ******* 


CI70 




209 


• 








CB70 




210 


* 


SCALE RCUTlhE 


CB70 




211 


• 








CB70 




212 


# 


VALUES 


IN -FL- REGISTERS < 


CI70 




213 


» 


TO SCALED VALUE! 


C»70 




214 


* 








CB70; 




215 










C»70: AC 


F8 07 


216 


SCALE 


LOV 


rtSLOT 


C873 89 


98 04 


217 






LOA 


SCALL* V 


C176; 60 


A3 02 


216 






STA 


DIVL 


CB79 B9 


38 03 


219 






LDA 


5CALH. Y 


CI7C-8D 


A4 02 


220 






STA 


DIVH 


CB7F. B9 


B8 05 


221 






LDA 


OFFXL. Y 


C3fl2 80 


Al 02 


222 






STA 


OREOL 


0895 B9 


36 06 


223 






LOA 


OFFXH, Y 


coee 80 


A2 02 


224 






STA 


OflECH 


CB5B:AD 


61 02 


225 






LDA 


XFLL 


■'B6E AE 


82 02 


226 






LDX 


XFLH 


CB91:20 


C2 CA 


227 






JSR 


OFFDIV 


CB94: AC 


F8 07 


228 






LDV 


MSLOT 


Cfl97: AO 


87 02 


229 






LDA 


TEHVL 


CB9A: 80 


83 02 


230 






STA 


TEHXL 


CB9D: AO 


88 02 


231 






LDA 


TEMY 


CBAO 80 


86 02 


232 






STA 


TEPtX 


C8A3:89 


88 06 


233 






LOA 


OFFYL* Y 


C8A6: 80 


Al 02 


234 






STA 


OR ECU 


CIA9:89 


36 07 


235 






LDA 


OFFYH, Y 


CiAC;8D 


A2 02 


236 






STA 


OREOH 


C9AF: AD 


83 02 


237 






LDA 


VFLL 


C8B2: AE 


64 02 


236 






LDX 


YFLH 


C8B520 


C2 CA 


239 






JSR 


OFFDIV 


: 5DS 60 

CBB9: 

CBB9: 




240 
242 
243 


m l __ 




RTS 






# 






C8B9 




244 


* 








CB89; 




245 


• 


TRIPLE 


READ I 


3F BITPAO 


C8B9 




246 


* 


IF OFFSCALE 


fHEN A 1 IS 


CB89 




247 


* 


PUT IN 


THE HIOH NIBBLE OF 


C8B9 




248 


• 


TEH 






CBB9: 




249 


• 








CBB9: 

CBS9 

CBB9:20 




250 
251 
252 


* 








F4 C8 


MREAD 


JSR 


Ml READ 


C BBC 90 


12 


233 






see 


SUCHK 


: : : = 2C 


00 CO 


254 






BIT 


KBD 


CBCi.30 


03 


255 






mi 


0FFS1 


C8C3: 4C 


89 ca 


236 






JMP 


MREAD 


CBC648 




237 


OFF 


PHA 




C8C7A0 


90 02 


2 38 






LDA 


TEM 


CBCA:09 


08 


259 






ORA 


#•08 


CBCC: 80 


80 02 


260 






STA 


TEM 


CBCF 68 




261 






PLA 




C3D0 48 




262 


SWCHK 


PHA 




C3D1:4D 


60 02 


263 






EOR 


TEM 


CBD4 6A 




264 






ROR 


A 


CB05:90 


05 


265 






BCC 


NQSWITCH 


CBD7: A9 


50 


266 






LDA 


••50 


CBD9 20 


Al CO 


267 






JSP 


CWAtT 


C DOC: 66 




268 


NOBHH 


PLA 




CBDD6A 




269 






ROR 


A 


COOE; AD 


80 02 


270 






LDA 


TEM 


C8E1.2A 




271 






ROL 


A 


CBE2:29 


13 


272 






AND 


■•13 


CBE4 80 


80 02 


273 






5TA 


T£M 


CBE7: 4E 


84 02 


274 






LSR 


YFLH 


CBEA6E 


83 02 


275 






ROR 


YFLL 


CBED 4£ 


82 02 


276 






LSR 


XFLH 


CIFO 6C 


81 02 


277 






RGR 


XFLL 



99 



CSF3;60 


278 




ATS 




CBF4 AD FQ 07 


279 


Ml BEAD 


LDa 


MSLOT 


CBF7: 0A 


280 




ASL 


A 


CBF8 OA 


281 




AS*- 


A 


C3F9: OA 


282 




ASL 


A 


CBFA: OA 


233 




ASL 


A 


C3F9 AA 


284 




TAX 




CBFC AO 03 


299 




LDY 


o*3 


CAFE: DO OC 


286 




DM 


C4SKP 


CCOO 


287 




003 


140G+0THRCM 


CCOO 13 


286 




cue 




CCOl BO 


289 




DFB 


MO 


CC02.38 


290 




SEC 




CC03 bo 


291 




CLV 




CC04: 08 


292 




PHP 




CC05 76 


293 




5EI 




CC06;2C FF CF 


294 




BIT 


POMSW 


CCO* JO 00 CS 


293 




J3R 


OTHROM 


CCOC- A9 00 


296 


C4SKP 


LDA 


•SO 


CCOE: 99 l 02 


297 


Z DLCOP 


STA 


XFLL. Y 


CCU 89 


298 




D£V 




CC12 10 FA 


299 




BPL 


ZDLOOP 


CC14 AO 06 


300 




LDY 


*u 


CC16; SC 7B 06 


301 




STY 


HNDX 


CC19;20 83 CC 


302 


RDLOOP 


J5S 


RESLP 


CC1C. SO 81 CO 


303 




LDA 


DEVO. X 


CCIF 20 42 CC 


304 




JSP 


READTAB 


CC22;S0 ID 


303 




BCS 


OFFSC 


CC24 AO 02 


306 




LDY 


H2 


CC26 20 8E CC 


307 




J5R 


AMOVE 


CC29: 20 83 CC 


308 




jsn 


RESLP 


CC2C BD 80 CO 


309 




LOA 


DEVI, X 


CC2F 20 42 CC 


310 




jsn 


READTAB 


CC32 80 OD 


311 




BCS 


OFFSC 


CC34 48 


312 




PHA 




CC35: AO 00 


313 




LDY 


MO 


CC37 20 8E CC 


314 




jsa 


AMOVE 


CC3A: 66 


315 




PLA 




CC3B Ce 78 06 


316 




DEC 


HNDX 


CC3E DO D9 


317 




BNE 


ftDLOCP 


CC40: 18 


318 




CLC 




CC4160 


319 


OFFSC 


ATS 




CC42:A? 12 


320 


READTA8 


LDA 


••12 


CC44: E9 01 


321 


tLCGP 


5BC 


m 


CC46: DO FC 


322 




ONE 


ALOOP 


CC48 BD 32 CO 


323 




LDA 


DEV3. X 


CC4B OA 


324 




ASL 


A 


CC4C-0A 


323 




ASL 


A 


CC4D OA 


326 




ASL 


A 


CC4E:0A 


327 




ASL 


A 


CC*F 49 70 


328 




ECR 


4*70 


CCS 1.29 FO 


329 




AND 


•»F0 


CC53 9D 37 02 


330 




STA 


TEMYL 


CC56 30 93 CO 


331 




LDA 


DCV2. X 


CC59 60 89 02 


332 




STA 


TEMV 


CC3C. A9 60 


333 




LDA 


••60 


CC3EE9 01 


334 A 1 LOOP 


SP: 


■•1 


CC60: DO FC 


333 




BNE 


A I LOQP 


CC62: AO 04 


336 




LDY 


ft*4 


CC64;4E 08 02 


33> DLCOP 


LSP 


TEMY 


CC67. 6E 87 02 


338 




ROT 


TEMYL 


CC6A 63 


339 




DEv 




CC6BD0 F7 


340 




ONE 


DC OOP 


CC6DAD 88 02 


341 




LDA 


TEHV 


CC70.D0 07 


342 




BNE 


ATST 


CC72A9 60 


343 




LDA 


11*60 


CC74:CD 87 02 


344 




CMP 


T£MYL 


CC77:90 02 


343 




BCC 


BTST 


CC79 C9 OA 


346 ATST 


CMP 


• •OA 


CC7B BD 82 CO 


347 &TST 


LDA 


DEV3, % 


CC7£ 49 01 


348 




EOR 


•*i 


CC80 29 01 


349 




AND 


Ml 


CC82 60 


350 




RTS 





*C400 SPACE ENTRY 



■? * 



f= -4 



100 



•r * 

r * 

r * 

is- ^ 



CCM 

CCM 

rv.fi/ 

CC89 

CC8A 

CC8D 

CCM 

CC91 

CC94 

CC97 

CC9A 

CC*»0 

CCAO 

CCAI 

CCA2 

CCA3 

CCA5 

CCA? 

CCA8 

CCAA 

CCAC 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD: 

CCAD 

CCAO 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD 

CCAD: 

CCAD 

CCAD 

CCAD 

CCAD: 

CCAD 

CCAD. 

CCAE; 

1 'TO 

CCB2: 

CCB3 

CCB8 

CCBA 

CCBC: 

CCBF; 

CCC1; 

CCC3, 

CCC6 

CCC8, 

CCCA 

CCCC 

CCCE; 

CCDO 

CCD2: 

CCD3, 

CCD6 

CCD8 

CCDA 

CCDC: 

CCDC. 

CCCO 

CCC2 

CCE4: 

CCE6 



AD FB 07 
48 

A9 03 

4« 

2C 4| CC 

60 

AD 37 02 



02 
02 
02 



79 Bl 

99 81 

AD 98 

79 32 02 

99 82 02 
60 



49 

C9 01 
DO FC 
68 

E9 01 
DO F6 



60 



BO OC 



A9 
BD 



00 

98 02 
3D 99 02 
A9 02 
83 36 
AD F8 06 
C9 AD 
DO 03 
0D AO 02 
C9 AO 
FO 29 

C9 AC 

FO 58 
C9 8D 
FO 26 
06 

AE 99 
FO OC 
49 00 
C9 OA 
90 06 



02 



EO 
FO 



01 

10 



DO 6C 
EO 06 
BO 68 



331 
3M 

333 
354 

355 
356 
357 
338 
339 
360 
361 
362 
363 
364 
365 
366 
367 
368 
369 
370 
371 
373 
374 
373 
376 
377 
378 
379 
380 
381 
382 
383 
384 
385 
386 
387 
388 
389 
390 
391 
392 
393 

394 

393 
396 
397 
399 
399 
400 
401 
402 
403 
404 
403 
406 
407 
408 
409 
410 
411 
412 
413 
414 
415 
416 
417 

416 

419 
420 
421 
422 
423 

424 



RESLP LDA MSLOT 

PHA 

LOAMS 

PHA 

BIT OFFSC 

UTS 
AMOVE LDA 

ADC 

STA 

LDA 

ADC 

STA 

ftTS 
OUAIT SEC 

G2UMT PHA 

C3WA1T SBC 

BNE 

PLA 

SBC 

BNE 

RT5 



TEMYL 
XFLL, Y 
XFLL. Y 
TEMY 
XFLH* Y 
XFLHi Y 



»* 1 
03UAIT 

Ml 
02UAIT 



CHARACTER ENTRY 5€GU€NCE 



CHARACTER STRING ANALYSIS 

5. . W*JN SET SCALE FACTOR TO 

NMW SET X OFFSET TO W**l 

NMM SET Y OFFSET TO WN 



X 

v. 

H, 

Q. 

U 
T. 

N, 

D 

C 
F. 
R. 
P. 



(i 

(1 

(t 
(i 



OR 2> 
OR 



!> 



5ET MIXED HIRES PKJCE 

SET HIRES MODE 

OR 2) SET MIXED LOPES MODE 

OR 2) SET LORES MODE 



OR 2) SET TEXT MODE 
SJPRES9 ALL PRINTING 
flESTOFE DEFAULT PARAKETERS 

HO CURSOR 

DATA RETURNED UNSCALED 

DATA RETURNED SCALED 

STREAM MODE ON 

STREAM MODE OFF* DEFAULT) 

OFFSET AFTER SCALE 

OFFSET BEFORE SCALE (DEFAULT* 



SYNTAX 



5YNT] 



5YNT? 



ChOUT 



PLO 

BCS 
LDa 

STA 

STA 
LDA 

STA 
LDA 

CMP 

BNE 

STA 
CMP 

DEO 
CMP 
BEG 
CMP 
DEO 
PHP 
LDX 
8E3 
£0R 
CMP 
BCC 
CPX 
BEG 
BNE 
Cf t 
DCS 



SYNTJ 

•to 

INX 

NFLAO 

11*2 

COUTL 

CHAR 

**AD 

SYNT2 

MI FLAG 

••AO 

EXIT4 

• •AC 
PR0C1 

• •SD 
PROC2 

1NX 
CHOUT 

• •BO 

• •A 
CHOUT 
••1 
EXIT3 
ERR1 

• •6 
ERRi 



* TEST IF THIS IS THE FIRST CHAR 

* IF NOT THEN 5**]P SET-UP 

* SET INDEX BUFFER TO IERO 

I CLEAR BUFFER STATUS 
-MOVE ENTRY POINTER 

* LOAD THE ENTRY CHAR 

i TE5T FOR MINUS 
» BRANCH IF NOT 
I SET TO NOT ZERO 
i TEST FOR SPACE 

* LEAVE IF SPACE 
-TEST FOR COMMA 

I IF SO - ANALYSE STRING 
i TEST FOR CR 

* IF SO - ANALYSE STRING 

I SAVE STATUS 

* BUFFER INDEX TO <-R£C 
ASSUME ON ALPHA CHAR IF FIRST 
- TEST FOR NUMERIC 

I IF SO THEN BRANCH 

i ITS OK TO GET HERE ONLY 

* IF ONE ALPHA HAS BEEN STORED 

I ITS AN ERROR IF THERE ARE 
i ALREADY 3 CHARS IN THE QL'FFEH 



101 



CCE8: 


AD 


F8 


06 


423 




CDA 


CHAR 


CCES; 


9D 


90 


02 


426 




STA 


INA, X 


CCEE; 


ES 






427 




INX 




CCEF. 


8E 


98 


02 


428 




STX 


INX 


CCF2; 


28 






429 


EXIT3 


PLP 




CCF3: 


4C 


86 


C9 


430 


EXIT4 


JMP 


EXIT 


CCF6 


38 






431 


PR0C1 


SEC 




CCF7: 


90 






432 




DF8 


♦90 


CCF9, 


18 






433 


PR0C2 


CLC 




CCF9 


08 






434 




PHP 




CCFA: 


AD 


90 


02 


433 




LDA 


INA 


CCFD 


•C 


OC 


CD 


436 




JMP 


C3SKP 


CDOO: 








437 




ORG 


•300+OTHRGM 


CDOO: 


18 






439 




CLC 




coot. 


80 






439 




DFB 


•BO 


CD02; 


38 






440 




SEC 




CD03: 


88 






441 




CLV 




CD04: 


08 






442 




PHP 




CD03 


78 






443 




3EI 




CD06; 


2C 


FF 


CF 


444 




BIT 


ROMSW 


CD09 


20 


00 


C6 


443 




JSR 


OTHflOM 


CDOC: 


AO 


12 




446 


C3SKP 


LDV 


*«12 


CDOE, 


88 






447 


ALPM1 


oev 




CDOF: 


FO 


3F 




449 




BEG 


ERR I 


CDllJ 


D9 


3C 


CE 


449 




CMP 


TABL-l- V 


CD14 


DO 


FS 




430 




BNE 


ALPH1 


CD16: 


A9 


CD 




431 




LDA 


•CRQUTIN 


CD18: 


49 






452 




PHA 




CD19: 


B9 


6D 


CE 


453 




LDA 


ADft-I.Y 


CD1C 


48 






454 




PHA 




CDID 


B9 


7E 


CE 


433 




LDA 


PAR AW- 1, Y 


coao 


AC 


98 


02 


436 




LEY 


INX 


CD23 


60 






437 




RTS 




CD24; 


CO 


01 




438 


ROUT IN 


CPY 


Ml 


C026 


DO 


29 




459 




BNE 


ERR1 


CD28. 


C9 


CE 




460 




CMP 


••CE 


CD2A 


DO 


03 




461 




BNE 


R0UT1 


CD2C, 


BD 


99 


02 


462 




STA 


NFLAO 


CD2F 


FO 


IB 




463 




BEQ 


CXIT3 


C031: 


AE 


F9 


07 


464 


R0UT1 


LDX 


MSLOT 


CD34 


C9 


C4 




463 




CMP 


••C4 


CD36: 


DO 


03 




466 




ONE 


R0UT2 


CD38, 


20 


90 


ce 


467 




JSR 


DEFAULT 


CD3B. 


DO 


OF 




469 




ONE 


EXITS 


6D3D) 


IE 


38 


03 


469 


RQUT2 


ASL 


PAGE-X 


CD40 


48 






470 




PHA 




CD*t 


68 






471 




PLA 




CD42 : 


FO 


04 




472 




DEO 


NOCRS 


CD44, 


OA 






473 




ASL 


A 


C043 


8D 


G8 


03 


474 




LDA 


PACE. X 


CD48 


6A 






473 


MQCRS 


ROR 


A 


CD49; 


9D 


OS 


03 


476 




STA 


PAGE. X 


CD4C 


4C 


OC 


CE 


477 


EXIT3 


JMP 


EXIT! 


CD4F 


©8 






478 


ERR 3 


PLA 




CD30 


20 


93 


FE 


479 


ERR1 


JSR 


SETV1D 


CD33 


AO 


19 




480 


EMSG 


LDV 


4*19 


CD55 


39 


43 


CE 


481 


EMSG1 


LDA 


STRIN-I. Y 


COM 


20 


CD 


FO 


482 




JSR 


CQUT 


CD5B: 


88 






483 




DEY 




COM 


DO 


F7 




484 




DNE 


EMSG I 


CD3E: 


AD 


91 


CO 


483 




LDA 


STCXT 


C061 


AO 


34 


CO 


486 




LDA 


SPAOl 


CD64: 


4C 


OC 


ce 


487 




JMP 


cxiti 


CD67; 


CO 


02 




498 


ARCUT 


CPY 


••2 


CD69 


DO 


E3 




489 




BNE 


CRR1 


CD60 


48 






490 




PHA 




CD6C 


AD 


91 


02 


491 




LDA 


INA*1 


CD6F 


49 


BO 




492 




EOR 


■ •DO 


CD71 


FO 


DC 




493 




BEG 


ERR3 


CD73 


C9 


03 




494 




CMP 


#•3 


CD75 


BO 


ce 




495 




8CS 


ERR3 


CD77 


6A 






496 




ROR 


A 


C078 


68 






497 




PLA 





SAVE T>« CHAR [N THE SUFFER 

I UPDATE THE BUFFER INDE* 

.RESTORE STATUS 
GOTO EXIT 

-SET CARRY IF A COMMA 

iBCS ALWAYS 
■ CLEAR CARRY IF A CR 
iSAVE THE CARRY 



•C3QQ SPACE ENTRY 



4 



r * 



;JUflP TO ROUTINE WITH RTS 



F 4 

r * 






CD79 BO 01 


498 


BCS 


NOROL 


CD7B 2A 


499 


ROL 


A 


CD7C AE F8 07 


300 NOflOL 


LDX 


MSLOT 


CD7F IE 89 03 


301 


ASL 


PAGE, X 


CD82 6A 


302 


ROR 


A 


C 083 20 BE CE 


303 


JSR 


STMODE 


CD86 4C OC CE 


304 


JMP 


EXIT! 


CD89 83 2B 


305 BR OUT 


STA 


MB ASH 


CD9B A9 B8 


306 


LDA 


««D6 


C090 83 2A 


507 


STA 


MB ASL 


CDBF 88 


308 


DEY 




6090:19 90 03 


309 D1GLP 


LDA 


INA- Y 


CD93: 49 BO 


310 


EOR 


•*B0 


C093 C9 OA 


311 


CMP 


»*A 


CD97; BO B7 


512 


BCS 


CRR1 


CD99 99 90 02 


513 


STA 


INA, Y 


CD9C 88 


314 


DEY 




CD90 00 Fl 


313 


BNE 


DICCP 


CD9F A2 00 


516 


LDX 


•to 


CDAl C8 


517 


I NY 




C0A2: 8D 78 03 


318 DIC2 


STA 


TEMPL 


CDA3 8€ F8 03 


319 


STX 


TEMPH 


CDA8 C8 


320 


INY 




CDA9 CC 96 02 


321 


CPY 


INX 


CDAC FO ID 


522 


DEO 


DIGS 


CDAE: A9 OA 


523 


LDA 


•*A 


CDBO 8D A3 02 


324 


STA 


COUNT 


CDB3A2 00 


325 


LDX 


•»0 


CDB3; B9 90 02 


526 


LDA 


INA, V 


CD08 6D 79 09 


527 DI01 


ADC 


TEWL 


CDBB: 48 


528 


PHA 




CDBC 8A 


529 


TXA 




CDBD 60 P8 09 


330 


ADC 


TEFTH 


CDCO 30 8E 


531 


8MI 


ERR1 


CDC2: AA 


532 


TAX 




CDC3:68 


533 


PLA 




CDC4 CC A3 02 


534 


DEC 


COUNT 


CDC7 DO EF 


333 


BNE 


DI01 


CDC9: FO D7 


536 


BEG 


DIG2 


CDCB:A4 2B 


337 DI03 


LDY 


H8ASH 


CDCD' CO 04 


538 


CPY 


• •4 


CDCFFO 06 


339 


BEO 


0IC4 


CDDl AC AO 02 


540 


LDY 


Ml FLAG 


CDD4F0 03 


S41 


Dt it: 


IG4 


CDD6: 20 38 : - 


542 


j£* 


TWOCOH 


CDD9* AC F8 07 


543 D1G4 


LDY 


MSLOT 


CDDC: 91 2A 


544 


STA 


(HOABL). Y 


CODE A9 39 


343 


LDA 


• •38 


CDCO- 83 2A 


346 


STA 


MDASL 


C0E2E6 23 


547 


INC 


HBASH 


CDE4 6A 


348 


TXA 




CDE3.91 2A 


349 


STA 


(HBASL), Y 


CDE7 4C OC CE 


330 


JMP 


EXIT1 


CDEA: AC F8 07 


331 CROUT 


LDY 


MSLOT 


CDED 48 


552 


PHA 




CDEE: 6A 


553 


ROR 


A 


CDEF 68 


554 


PLA 




CDF090 03 


555 


BCC 


CR0UT2 


CDF2 3* 38 04 


356 


AND 


HPAG€. Y 


CDF9: BO 03 


557 


BCS 


CROUT3 


CDF7 19 38 04 


558 CR0UT2 


ORA 


MP AGE. Y 


CDF A: 99 38 04 


559 CRCUT3 


STA 


MP AGE* Y 


CDFD 4C OC CE 


360 


JMP 


EXIT1 


CEOO 


361 


ORG 


•600+0THR0H 


CEOO: IB 


362 


CLC 




CE01 BO 


563 


DFB 


• BO 


CE02 38 


364 


SEC 




CE03 B8 


363 


CLV 




CE04 08 


366 


PHP 




CE09 78 


367 


SEI 




CE06 2C FF CF 


568 


BIT 


ROMSW 


CE09 20 00 C8 


569 


JSP 


OTHRCM 


CEOC. A9 00 


370 EXIT1 


LDA 


••0 



. «CoOO SPACE ENTRY 



102 



b =a 



103 



CEOEiSD 


AO 


02 


571 


STA 


MIFLAO 


CE11 QD 


98 


02 


572 


STA 


INK 


CE14; AC 


F8 


07 


573 


LDY 


MSLOT 


CE17: B9 


38 


04 


574 


LDA 


MP ACE. V 


CE1A29 


CO 




575 


AND 


tt*CO 


CElC 99 


38 


04 


576 


STA 


PIPAGE* Y 


CElF 89 


B8 


03 


577 


l:« 


PACE. V 


CE22: 29 


3F 




578 


AND 


•tar 


CE24 49 


25 




579 


EOR 


»*25 


CE2*! 19 


38 


04 


580 


ORA 


npACE, y 


C£29 99 


38 


04 


581 


STA 


MPAGE. Y 


CE2C 28 






582 


PLP 




CE2D BO 


12 




583 


BCS 


EKIT2 


CE2F; AD 


99 


02 


534 


LDA 


NFLAO 


CE32 FO 


OA 




585 


BEG 


PRINT 


CE34 A9 


58 




586 


LDA 


MORTS 


CE36 85 


36 




587 


STA 


COUTL 


CE38; A9 


FF 




588 


LDA 


tlORTS/256 


CE3A as 


37 




589 


STA 


COUTH 


CE3C DO 


03 




590 


ONE 


EXIT2 


CE3E.20 


93 


FE 


591 PRINT 


J5R 


5ETVID 


CE41 4C 


86 


C8 


592 EXIT2 


^P 


EXIT 


CE44 3D 






593 STftlN 


DF3 


MO 


CE45 02 


CF 


02 


594 


ASC 


-RORRE 


CE48 + D2 


C5 


AO 








CE4B. D8 


CI 


D4 








CK4|; C£ 


09 


D3 








CE51: AO 


04 


C5 








CE54: CC 


C2 


CI 








CE57.04 


AO 


AA 








CE5A AA 


AA 


87 








CE5D DO 


Dl 


CI 


595 TABL 


ASC 


'PQA85XYTM 


CE60 C2 


D3 


08 








CE63 D9 


D4 


CD 








CE66 C8 


CC 


C7 








CE69 C3 


C6 


D2 








CE6C CE 


C4 










CE6E: E9 






596 ADR 


DFB 


CROUT-1 


CE6F E9 






597 


DFB 


CRQUT-1 


CE70: E9 






598 


DFB 


CROUT-1 


CE71 E9 






599 


DFB 


CROUT-1 


CE72 66 






600 


OP 3 


8RCUT-1 


C£73 98 






601 


DFB 


BROUT-1 


CE74 88 






602 


DFB 


BROUT-l 


CE75; 66 






603 


DF3 


AROUT-l 


CE76: a* 






604 


0*8 


AROUT-l 


CE77 66 






605 


DFB 


ARQUT-1 


C£78 66 






606 


DFB 


AROUT-l 


CE79 66 






607 


DFB 


AROUT-l 


CE7A- 23 






60S 


DFB 


ROUT IN- 1 


CE78 23 






609 


DFB 


ROUUN-i 


CE7C 23 






610 


DFB 


ROUT IN- 1 


CE7D 23 






611 


DFB 


ROUTIN-l 


CE7E 23 






612 


DFB 


RQUTIN-l 


CE7F 90 






613 PAR AH 


DFB 


• BO 


CE80; 7F 






614 


OFP 


♦ 7F 


CE81 40 






619 


DFB 


•40 


CE62 2F 






616 


DFO 


• BF 


CEB3 04 






617 


DFO 


•04 


CE84: 05 






618 


DFB 


•05 


CE85: 06 






619 


DFO 


•06 


CES6: 08 






630 


DFB 


•08 


CE87 48 






621 


DFP 


• 48 


CE88 40 






622 


DFB 


•40 


CES9 02 






623 


DFB 


•02 


CESA OA 






624 


DFB 


• OA 


CE88:00 






625 


DFB 


•0 


CE3C.01 






626 


DF& 


• 01 


CE8D; SO 






627 


DFB 


•BO 


CE8E: CE 






628 


DFB 


•CE 


CE8F;C4 






629 


DFB 


•C4 






XATNY5 TEL5AT 



W '* 



E =1 

B =1 

r -J 

r =i 






CE*0 
CE«0 






631 
632 
633 


• 






CE40 






634 


* DEFAULT 




CE90 






635 


* 






CE9Q 






636 


* SCALE » 


< 16 




CE90 






637 


# X OFFSET * 1536 


CE90 






*38 


• V OFFSET • 1536 


CE90 






639 


• HIRES PAGE 2 




CE90 






640 


* PRINT CN 




CE90 






641 


* CURSOR 


ON 




CE90 






642 


# STREAM 


hODE OFF 


CE*0 






643 


• DATA RETURNED 


UNSCALED 


CE9Q 






644 


» OFFSET 


BEFORE 


SCALE 


CE90 






645 


• 






CE90 
CE90 
C«90: A9 






646 
647 

648 








10 




DEFAULT 


LDA 


4*10 


CE92 9D 


98 


04 


649 




STA 


SCALLi X 


CE95 A9 


00 




650 




LDA 


**0 


Gt97:9D 


38 


05 


651 




STA 


SCALH, X 


CE9A 9D 


38 


OS 


652 




STA 


OFFXL* X 


CE9D 9D 


88 


06 


653 




STA 


OFFYL, X 


CEAO 8D 


98 


02 


654 




STA 


I NX 


CEA3A9 


03 




655 




LDA 


**3 


CEA5 8D 


80 


02 


656 




STA 


TEM 


CEA8 A9 


06 




657 




LDA 


#•6 


CEAA 9D 


38 


06 


658 




STA 


OFFXH. X 


CEAD 9D 


38 


07 


659 




STA 


OFFYH. X 


CEB0:2C 


10 


CO 


660 




BIT 


KBDSTRB 


CEB3 20 


F4 


CD 


661 




JSR 


MIREAD 


CEB6: 20 


DO 


cs 


662 




JSR 


SWCHK 


CEB9: AE 


F8 


07 


663 




LDX 


MSLOT 


CEBC A9 


40 




664 




LDA 


»«40 


CEBE AS 






665 


SThODE 


TAY 




CUFrAD 


52 


CO 


666 




STA 


SNMIX 


CEC2 SD 


57 


CO 


667 




STA 


SHIRES 


CEC5 60 


51 


CO 


668 




STA 


STEXT 


CECS: 80 


54 


CO 


669 




STA 


SPAC1 


C£CB:29 


DC 




670 




AND 


•»0C 


CECD: FO 


03 




671 




BEO 


DEFl 


CKCF:&D 


53 


CO 


672 




STA 


MIX 


CED2 98 






673 


DEFl 


TYA 




CED3 29 


63 




674 




AND 


«*63 


CED5: FO 


03 




675 




DEO 


0EF2 


CED7. AD 


50 


CO 


676 




LDA 


SCR 


CEDA 98 






677 


DEF2 


TYA 




CED8 29 


4A 




678 




AND 


H«4A 


CEDD FO 


03 




679 




DEO 


DEF3 


C EOF AD 


55 


CO 


660 




LDA 


SPAG2 


CEE2 IB 






681 


DEF3 


TYA 




CEE3:29 


03 




682 




AND 


1fr«03 


CEE5 FO 


03 




683 




BEO 


DEF4 


CEE7:8D 


56 


CO 


664 




STA 


SLORES 


CEEA: 98 






685 


DEF4 


TVA 




::c: 9D 


B8 


03 


686 




STA 


PACE* X 


CEEE29 


3F 




687 




AND 


#*3F 


CEFO: 49 


25 




688 




EOR 


#•25 


CEF2: 9D 


38 


04 


689 




STA 


MP AGE, X 


CEF5: 60 
CEF6 






690 
691 
692 




RT5 


♦ 






CEFo 






693 


• JUMP TABLE 




CEF6 

CEF6: 

CEF6 






694 
695 
696 


« 












ORG 


•6F6+0THR0M 


CEF6 4C 


4C 


CA 


697 


JUINCHH 


JMP 


U1NCHK 


CEF9 4C 


B9 


CB 


698 


JHREU 


JMP 


HREAD 


CEFC:4C 


70 


CB 


699 


JSCALE 


JMP 


SCALE 


»** SUCCESSFUL ASSEMBLY; NO 


ERRORS 



SET SCALE FOR 16 
.SET X OFFSET TO 1536 

;S€T Y OFFSET TO 1536 



•SET PACE FOR HIPEZ P2 



• AND FOR FULL SCALE OUTPUT 
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105 



cent 


AH OOP 


CM* 


AOTl«0f1 


C800 


AICIII 


CO* 


Artr 


'1D89 


MOU1 


<r*oc 


c t«»p 


wit 


CALLCUffS 


a ^ 


CI. OOP 


34 


COUIL 


*:•« 


c 


*:*« 


CTRLUOP 


Ct«A 


DCF4 


COM 


MVi 


<:da2 


DIG? 


0?A4 


t IVM 


CARD 


OtMP 


TOM 


fMSGI 


CDM 


ERRI 


CD4C 


exit* 


CB2C 


FEXIT 


:g90 


OLOOP 


2A 


HflASi 


CA2D 


MP>OSNl 


0203 


tN2 


C8B3 


1NEX2 


FF38 


lOftTS 


XEF6 


JW t Honk 


C*DE 


LQCLC 


CBOC 


«OCP 3 


em 


Ml READ 


Cllf 


MPEAD 


CD4Q 


NOCRS 


CAC2 


GFFOIV 


0638 


OFFXH 


02A2 


QRECH 


C*9E 


OUTSIDE 


K90Q 


POINT 


CE3E 


PRINT 


CO 42 


READTA8 


CFFF 


RQttSW 


^CACl 


RTN 


0488 


SCALL 


C036 


SLORES 


C033 


SPAC2 


C8D0 


9WCHK 


CE3D 


TA8L 


0286 


TEMX 


C936 


TEXT 


0281 


XFLL 


CCOE 


ZDLOOP 


24 


CH 


36 


COUTL 


0202 


IN2 


0292 


XFLH 


0286 


TEMX 


0238 


RE5H 


0298 


SAVSLOT 


02A3 


DIVL 


03B8 


PACE 


0378 


TEMPL 


0678 


HNDX 


07F8 


MSLOT 


C051 


8TEXT 


C03S 


SPAG2 


C081 


DEVO 


C8G9 


AQTHROM 


C068 


EiPNT 


C886 


EXIT 


C9D0 


ASCI EX 


C90C 


ClSHP 


c**€ 


Out: 


C971 


MIRES 


C*AO 


C 



CE6E 


AW 


CD67 


ARCUT 


C8C6 


ASCEX 


C9C4 


B 


CAAO 


BSKIP 


CAOC 


C25KP 


CCE4 


CHOUT 


02A3 


COUNT 


CDF7 


CRCUT2 


CDEA 


CRCUT 


CE02 


DEFl 


CE90 


DEFAULT 


C082 


DEV3 


CDCB 


DI03 


CADI 


DIVtCC 


CB37 


E1EXIT 


? C033 


EMSG 


CD4F 


ERR3 


C886 


EXIT 


CA86 


FLOOP 


C931 


GR 


C971 


HIRES 


CA2C 


HP0SN2 


0203 


INS 


C88C 


IN6XIT 


CAAF 


JLOOP 


COOO 


KBD 


C980 


LOOP 


?CB1F 


LOOP 4 


02A0 


M I FLAG 


07F8 


MSLQT 


C834 


NCPR 


CBC6 


OFFSl 


05BB 


QFF1L 


02 A 1 


CRECL 


C9D0 


OUT 


CA80 


P03IT 


CCF6 


PROCI 


0288 


PECH 


CD31 


RCUTi 


029B 


SAVSLOT 


FE93 


8ETVID 


C033 


SPIIX 


C031 


STCXT 


CC8C 


SYNTl 


03F8 


TEMPH 


0287 


TEMYL 


CB38 


TWQCOrt 


CA3F 


YES 


28 


BASL 


37 


CCUTH 


0203 


IN3 


0283 


YFLL 


0287 


TEMYL 


0290 


INA 


02AO 


MI FLAG 


02A4 


DIVH 


0438 


MP AGE 


0388 


OFF XL 


0688 


OFFYL 


COOO 


K8D 


C032 


SNMIX 


C036 


SLOPES 


C082 


DEV3 


C820 


PRCMK 


C86D 


END 


ceec 


1KSXIT 


C8F0 


CURSOUT 


?c9ia 


CALLCURS 


C931 


GR 


C980 


LCOP 


C983 


A 



CDOE 


ALPHl 


C983 


A 


CA6A 


ASCON 


C9F0 


3ASCLC 


CC7B 


BTST 


CCOC 


C4SKP 


24 


CH 


FDED 


COUT 


CDF A 


CR0UT3 


CAB2 


CSKIP 


CEDA 


DEF2 


C081 


DEVO 


^CS20 


D€XIT 


CDD9 


DIC4 


02A3 


DIVL 


CS68 


EIPNT 


C86D 


END 


CEOC 


EXIT1 


CE41 


EXIT2 


CCA2 


C2WAIT 


CCA1 


OWAlT 


CA9D 


HLOOP 


020O 


I NO 


0290 


INA 


7C900 


INPUTXY 


?C£F9 


JMREAO 


C010 


K3DSTPD 


CAD7 


L00P1 


C962 


L0R1 


'C930 


MIX 


0299 


NFLAO 


CD7C 


NOROL 


CC4t 


0FF8C 


0738 


OFFYH 


C800 


GTHPOM 


0309 


PACE 


CAF2 


POS 


CCF8 


PR0C2 


0287 


REGL 


CD30 


R0UT2 


C870 


SCALE 


CO 30 


SOR 


C032 


SNMIX 


CE8E 


8TM0DE 


CCC6 


SYNT2 


0378 


TEMPL 


0288 


TEMY 


CA4C 


UINCHK 


0284 


YFLM 


2A 


H3ASL 


0200 


I NO 


0280 


TEM 


0284 


YFLH 


0287 


REGL 


0298 


[NX 


02A1 


OPEGL 


02A3 


CIHAR 


0488 


SCALL 


03F8 


TEMPH 


06F6 


CHAR 


C010 


KBDSTR3 


CO 33 


8MIX 


C037 


SHIRES 


C083 


DEV2 


CS34 


NOPR 


C86F 


INEX1 


C890 


CLOOP 


>C900 


INPUTXY 


X930 


MIX 


X93A 


LORES 


C983 


CTRLOOP 


C9C4 


3 



s: d 



CCSE 


AMOVE 


CC44 


ALOOP 


CA89 


ASK IP 


28 


BASL 


02A3 


CIHAR 


COOC 


C3SKP 


06F8 


CHAR 


37 


COUTH 


CQFO 


CUPSOUT 


C9D8 


CTRCHK 


CEE2 


DEF3 


C080 


DEVI 


CD88 


DI01 


CD90 


DIGLP 


CC64 


DLOOP 


C23F 


EEXIT 


ce3F 


EPOINT 


CCF2 


EX1T3 


CCF3 


EXIT4 


CCA3 


G3UAIT 


28 


H9ASH 


0678 


HNDX 


0201 


INI 


C86F 


I HEX I 


0298 


I NX 


>C£FC 


JSCALE 


CA9A 


KLOOP 


CAF3 


LOOP 2 


? C93A 


LORES 


0438 


MP AGE 


CA67 


NO 


C8DC 


NOSwlTCH 


C864 


OFFSET 


06B8 


OFFVL 


C94E 


0UT1 


CE7F 


PAP AM 


C82D 


PRCHK 


CC19 


RDLCC^ 1 


CC83 


RESLP 


CD24 


ROUT IN 


0338 


SCALH 


C0S7 


SHJRES 


COM 


SPACl 


CE44 


STRIN 


CCAO 


SYNTAX 


0283 


TEMXL 


0280 


TEM 


0282 


XFLH 


0283 


YFLL 


28 


HBASH 


0201 


INI 


0281 


XFLL 


0283 


TEMXL 


0268 


TEHV 


0299 


NFLAO 


02A2 


OREGH 


02A3 


COUNT 


0338 


SCALH 


0638 


OFFXH 


0738 


OFFYH 


C030 


SCR 


C034 


SPACl 


coeo 


DEVI 


ceoo 


OTHROM 


C83F 


EPOINT 


C883 


IMEX2 


C8C6 


ASCEX 


*C902 


POINT 


C936 


TEXT 


C962 


L0F1 


C99E 


OUTSIDE 


C9D0 


OUT 



GfM CTRCHK 


C9DE LQCLC 


C9F0 8ASCLC 


CAOC 


C2^» 


CA2B HP0SN1 


CA2C HP0SN2 


CA39 CLOOP 


CA4C 


UINCHK 


CA3F YES 


CA67 NO 


CA6A ASCON 


CA80 


POSIT 


CA86 FLOOP 


CA89 ASKIP 


CA9D HLOOP 


CAAO 


BSKIP 


CAAF JLOCP 


CA02 CSKIP 


CABA KLOOP 


CA8D 


OS* IP 


"CACl RTN 


CAL2 OFFDIV 


CADI 01VIDC 


CAD7 


L00P1 


CAF2 POS 


CAF3 LD0P2 


CBOC L00P3 


?CBIF 


LOOP 4 


C82C FEXIT 


^CB2D DEXIT 


C33F EEXIT 


CB37 


E1EXIT 


CB38 T woe 0*1 


C364 OFFSET 


CB70 SCALE 


CQB9 


PREAD 


CBC6 OFFSl 


CBDO SUCHK 


CBDC NOSWITCH 


CBF4 


M1READ 


CCOC C48KP 


CCOE Z DLOOP 


CC19 RDLOOP 


CC41 


OFFSC 


CC42 READTAB 


CC44 ALOOP 


CC3€ A1L00P 


CC64 


DLOOP 


CC79 ATST 


CC7B 8TBT 


CC83 RESLP 


CC8E 


AMOVE 


CCA1 CUAIT 


CCA2 C2WAIT 


CCA3 G3UAIT 


CCAD 


SYNTAX 


CC8C 5YNT1 


CCC6 SYNT2 


CCE4 CHOUT 


CCF2 


EXIT3 


CCF3 EXIT4 


CCF6 PROCI 


CCF8 PR0C2 


CDOC 


C3SKP 


CODE ALPHl 


CD24 ROUT IN 


CD31 R0UT1 


CD3D 


R0UT2 


CD48 NOCRS 


CD4C EXITS 


CD4F ERRS 


C030 


ERR1 


■>CD33 EMSG 


CDM EMS01 


CD67 AROUT 


CD7C 


NOPOL 


CD89 SPOUT 


CD90 DIOtP 


CDA2 DIG2 


C&B8 


DIG1 


CDCB DIG3 


CDD9 DI04 


CD€A CROUT 


CDF7 


CR0UT2 


CDFA CR0UT3 


CEOC EXIT1 


CE3E PRINT 


CE41 


EXIT2 


CE44 STRIN 


CE3D TA8L 


CE6& ADR 


CE7F 


PAR AM 


CE90 DEFAULT 


CE8E STMOOE 


CED2 DCF1 


CEDA 


D^2 


CEE2 D£F3 


CEEA DEF4 


?CEF6 UINCHK 


*CEF9 


JMREAD 


^CEFC <JSCALE 


CFFF R0W3W 


FDED COUT 


FE93 


SETVID 


FF58 IOPT? 
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• APPLE COMPUTER 

• SYSTEMS SOFTWARE 
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PACE 

■ # 

• BITPAD TO APPLES0FT1J » 

• INTERFACE ROUTINE • 

• THIS ROUTINE MAKES • 

• IT POSSIBLE TO CALL « 

• THE BITPAD AT HIGH * 

• SPEED AWD FETCH THE # 

• POINTS DRAWN * DIRECTLY* 

• INTO APPLESOFT DATA • 

• ARRAYS AT MAXIMUM • 

• SPEED. ARRAYS MUST BE * 

• DIMENSIONED BEFORE * 

• CALLING THIS ROUTINE • 

• THEY ARE XX AND VZ • 

• IN ADDITION NX AND DX * 

• MUST ALSO BE ALLOCATED* 



^ 



ORG 

Q8J 



♦COO 
*2000 



•PAGE ZERO 
VARPNT 

VARNAM 

LOWTR 

TXTTAB 

VARTAfl 

ARYTAQ 

STREND 

ARYPNT 

*FAC EQU 

DELTA 

INDX 

NADRS 

MAXN 



USAGE 
EQU i . I 
EQU «6l 
EQU »9B 
EOU »67 
EOU »69 
EQU «6B 
EQU t6D 
EQU «94 
*9D TO A3 
EQU 191 
EQU »9E 
EQU *A0 
EQU *A2 



MP * 

f * 
r ^ 

m 4 



•ARC EQU 

TICFLC 

XVPTR 

YVPTR 

TMAXY 



*A5 TO 
EQU 
EQU 
EQU 
EQU 



AB 
•A5 
«A6 
*A6 

*AA 



• * TMAXY 

XOL 

YO 

ERR FLO 
REMSTK 

ERflNUH 



•MINIMI XED 
EQU *E0 
EQU »E1 
EQU *£2 
EQU *D8 
EQU *F8 
EQU *DE 



* TEMP MAX Y COORD LIMIT 
MOPE* 160* MAXY) 

.PRIOR 
(PRIOR 

• PRira 



X -COORD SAVE 
X-COORD SavC Hi 
V -COORD SAVE 






69 GENTRY POINTS USED 
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OCOO 

OCOO 

OCOO 

OCOO 

OCOO 

OCOO 

OCOO. 

OCOO 

OCOO 

OCOO: 

OCOO 

OCOO 

OCOO: 

OCOO 

OCOO: 

OCOO: 

OCOO' 

OCOO' 

OCOO: 

OCOO. 

OCOO 

OCOO: 

OCOO 

OCOO: 

OCOO: 

OCOO 

OCOO 

OCOO 

OCOO 

OCOO 

OCOO 

OCOO: 

OCOO 

OCOO 

OCOO 

OCOO: 

OCOO 

OCOO 

OCOO 

OCOO: 

OCOO; 

OCOO: 

OCOO 

OCOO: 

OCOO: 

OCOO 
OCOO 
OCOO 
OCOO 
OCOO: 

OCOO: 

OCOO 

OCOO: 

OCOO 

OCOO. 

OCOO 

OCOO 

OCOO 

OCOO: 

OCOO 

OCOO: 

OCOO: 
0C03: 
0C06: 
0C09 

0CO9 

OC09 

OCOB 

OCOD 

OCOF 

OCll: 

OCll 

OCll 



4C 74 OC 

4C 39 OF 
4C 27 OF 



C4 
CE 
D8 

P9 



BO 
90 
80 
BQ 



70 HILIN EQU *F33A * «EAL HILIN ENTRY 

71 HPLOT EQU *F437 * REAL **»LOT ENTRY 

72 CHRCET EQU *00B1 I NEXT POM CHAP 

73 CHRCOT EQU »0OB7 

74 CRDO £0U 1DAFB 
73 OUTQST EQU SDB5A 

76 OUTDO EQU «DB3C 

77 ISLETC EQU «E07D 

78 TYPERR EQU SD42A 

79 HNDLERX EQU »F2EF 

60 UAIT EQU *FCAB , MON A WAIT 

81 PACE 

B2 ♦»**#•••■**«*••***#**** 

83 • DEVICE ADDRESSES 

84 SPKft EQU «C030 * TOGGLES APPLE SPKP 

83 STEXT EQU *C031 > SET TEXT MODE 1 

96 5PACI EQU tC034 
87 •*..•♦*•«••*•***•*•••»#• 

68 • BITPAD INTERFACE EQU • 

89 ••*•••**•••••»**••»••«• 

90 TEM EQU *280 - RETURN FLAG LOC 

91 ♦ HI NIBBLE -l FOR SCALED RESULTS 

92 * LO NIBBLE 0*PEN DOUN 

93 m 1-PEN LIFT 

94 • 2 PEN FALL 

95 • 3-PEN UP 

96 XFLL EQU »281 i X-COORD LO UNSCALED 

97 XFLH EQU #282 > X-COORD HI UNSCALED 

98 YFLL EQU *283 > V-COORP LOW UNSCALEP 

99 YFLH EQU *284 iY-COORH HI UNSCAlEP 

100 TErtXL EQU *285 i X-COORO LO SCALED 

101 TEMX EQU *286 i X-COORD Hi SCALED 

102 TEMYL EQU *287 I Y-COORD LO SCALED 

103 TEMY EOU »288 * Y-COORD HI SCALED 

104 SSMl EOU *29A .LO INDIRECT ADAS 
103 SAVSLOT EQU »29B 

106 RTNCD EQU »28C ,-700 BITSOFT RTN CODE 

107 PACE EQU *3B8 - ♦CN SCREEN «0DE 

108 * HI BIT«1 MEANS SCALE DATA 

109 » 40 ■ HIRES PG2 

110 » 20 - HIRES PCI 

111 HIRESI EQU *20 

112 * 08 ■ TEXT PC2 

113 • 04 ■ TEXT PGl 

114 • 02 » LORES PC2 

115 » 01 - LORES PG1 

116 * 42 - HIRES PG2 MIXED 

117 * 31 * HIRES P01 MIXED 

118 • OA - LORES P02 MIXED 

119 • 03 - LORES PCI MIXEF1 

120 MXYVALU EQU 160 - FOR NORMAL APPLE 

121 HSLOT EQU 17F8 

122 •*•••#•••#••••*••••*•*•• 

123 • BITPAD ENTRY POINTS • 

124 •••#•#*#*♦**♦»*•♦**••••• 

123 POINT EQU tC!02 

126 MREAD EQU *CEF9 

137 UlNCt* EQU *CEFfc 

128 SCALE EOU *CEFC 

129 PACE 

130 • ** ••••* 

^31 JMP BITSOFT 

132 jnP FINDVAP .Finn VARABLE utility entr 

133 JUP FINDARY .FIND ARRAY UTILITY EflTRY 

134 •••••••«•#*•••••*•••**•••• 

135 VNAMTAB EQU » 

136 DLTAWAM DFB «4, %S0 * DX 

137 NDXNAM DFB t > i ■ I NX 
139 XVNAM DF8 tD8. *80 * XX 

139 YVNArt DFB *D9, #80 * YX 

140 DNAME EOU DLTANAM-VNAMTAB 

141 NNAME EQU NDXNAM - VNAMTA8 

142 JCNAMG EOU XVNAM-VNAMTAB 
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ecu 

oci t 

0CI2 
0C13 
004 
0CI3 
0CI6 
OCI7 
OCIA 
OCID 
QC20 
0C23 
0C26 
0C29 
0C2C 
0C2F 
0C31 
0C31 
0C31 
OC31 
0C34 

0C37: 

0C38: 

OC3B 

0C3E. 

OC41: 

0C42: 

OC45: 

0C48: 

OC4B: 

CC4E. 

OCSl: 

OC54: 

0C37: 

0C3A: 

0C5D 

QCfrC: 

DC 63: 

OC66: 

0C69 

0C6C 

0C6F 

OC72: 

OC73. 

0C79: 

OC70: 

OC7C 

OC7F 

CC82; 

CC85 



CCQfl 

ocse 

0C91: 
0C94: 
0C94. 

0C94: 

0C94 

0C94; 

0C94; 

0C94: 

0C94: 

0C94; 

OC94: 

0C94 

0C94 

0C97 

0C9<? 
0C9C 
OC9F 
OCA! 
OCA3 
0CA3 



00 
00 

id 

01 

oo 

CO 

03 4F no 

19 52 C9 

4B D4 
41 



no 

4C C3 

13 CF 



07 
20 
10 
20 

on » D3 

14 43 02 
37 79 



20 44 41 
50 $4 49 



C2 

44 



41 

41 



45 4C 
20 



4F 



20 

44 



20 
44 



34 41 

33 49 5A 
C3 

44 43 4C 

54 41 

55 4E 
43 46 49 
4E 43 C4 
49 4E 44 

45 58 
55 4E 

43 46 49 
4E 43 C4 

32 32 
59 20 

44 49 4D 

43 4E 53 
49 4F CE 
42 41 44 
20 33 33 
42 33 43 

32 49 50 
04 

4E 4F 34 

20 49 4E 

20 33 43 

41 4C 43 

44 20 48 
49 32 45 

33 20 40 
44 



C3 



20 95 OF 
A2 00 



20 £4 
20 38 

00 33 
A2 39 

24 08 



OE 
OF 



143 VNArtE EGU 

144 M1NXL DFD 

143 HINX HFB 

146 MAX XL DFB 

147 rtAXX DFB 

148 Ml NY DFD 

149 MAXY DFQ 

130 CTABLE DFB 

131 DFB 

1 32 DFB 

1 33 DFB 
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0F2B 
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FO 3C 
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0F3B 
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483 *•*»«##•♦•••••••#•••••*# 
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488 !NX 
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492 #«••••••##•**•**••*«*•« 
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MYCHCET 


OF 03 


90 IE 


616 


BCC 


SET2ND 


0FB5 


20 7D £0 


617 


JSR 


ISLETC 


CFB8 


BO 19 


618 


DCS 
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FF 
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XOL 
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BD 
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YO 
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60 
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6n 


FC 
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6040 


BO 


FC 
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29 
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6n 


FB 


02 
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FLCH 
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FD 
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FLCH 
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02 
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57 
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4C 
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A5 
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FLCL 
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84 
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61 


85 
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CLEAR OUT 
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86 
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LDA 
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XOL 
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8D FE 


02 
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XOH 




60A4 


EE FD 


02 
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YO 
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60A7 
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60 


92 




JSR 


HFOSN 


REPOSN 


60AA 


AD FD 


02 
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LDA 


YO 


AND TEST 
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CMP 


••CO 
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60 AF 
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4C 29 


60 
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JMP 


8L0CP 
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60B4 
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97 
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LDX 


•BOO 
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99 


RLP 
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99 
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•00. X 
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60B9 


ES 
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60BA 


EO 04 
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«*04 
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BNE 
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;C3 
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•OOF 
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68 
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106 




TAX 
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107 




RTS 
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108 


• 
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109 


•HPOSN 


HflES BIT 


POSN ROUT 




60C3 






no 
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111 


* 








60C3 


AD FD 


02 


112 


HPOSll 


LDA 


YO 




60C6; 


AE FF 


02 


113 




LDX 


XOL 




60C9 


AC FE 


02 


114 




LDY 


XOH 




60CC, 
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115 


hpos 


PHA 






60CD: 
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116 




AND 


••CO 




60CF 
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HBASL 




60D1 


4A 




119 




LSft 


A 
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4A 




119 




LSR 


A 




60D3 
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120 




ORA 


HBASL 




60D5 


85 00 
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HBASL 




60D7 
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60D9 


85 01 
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STA 


HBASH 




60DA 


OA 




124 




ASL 


A 




60D8 


OA 




125 




ASL 


A 




6OD0 


OA 




126 




ASL 


A 




60nD 


26 01 




127 




ROL 


HBASH 




60DF 


OA 




128 




ASL 


A 




60C0 


26 01 




129 




ROL 


HBASH 




60€2 


OA 




130 




ASL 


A 




60E3 


66 00 




131 




ROR 


HBASL 




•0E5 


A5 01 




132 




LDA 


HBASH 




60E7 


29 IF 




133 




AND 


••IF 




60E9 


09 40 




134 




ORA 


••40 




/...i U 


95 01 




135 




5TA 


HBASH 




fcOED 


8A 




136 


XPOS 


TXA 




THIS ENTRY ONLY 


6UCE 


CO 00 




137 




CPY 


••0 


COMPUTES Y I HMASK 


60FO 


FO 05 




138 




DEO 


HP0SN2 




hi* H 


AO 23 




139 




LDY 


••23 




•Of 4 


69 04 




140 




ADC 


**4 




J,Ol /. 


cp 




141 


HPOSNI 


I NY 
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A0F7 

60FD 
60FC 

aoff 

6101 

M02 
6102 
6102 
6103 

6106 

6109 

610C 

61 OF 
6112 
6119 

£>1 10 

6110 
61LE 
6120 
6122 
6124 
6126 
6127 

6I2A 
61 2C 
612F 

6132 
6135 
6138 
613A 
6131) 
613F 
6141 

6144 
6147 
6148 
6148 
6148 
6148: 

6148. 

6I4C 

614F 

614F 

614F 

614F 

61 4F 

614F 

614F 

61 4F 
614F 
614F 
614F 

614F 
614F; 
614F 
614F 

614F 
614F 

6130 

6131 
153 

134 

136 

137 
139 
130 
1 3D 



4. 

6 

6 

61 

61 

61 

61 



6I3F 
6161 

6 1*4 



E9 07 
00 FD 
M 

01) 4F 60 

83 02 
60 



IB 
AF> FF 



02 
02 



ED FC 
BD FC 02 
AD F£ 02 



8D 



02 
02 



AE FC 02 
AC FB 02 
20 ED 60 
A3 02 
49 FF 

00 

00 



31 
9l 



AD FC 02 
69 01 
CD FF 02 
AD FB 02 
ED FE 02 
EE FC 02 
DO 03 
EE F8 02 
90 D6 
A9 00 
81) FC 02 
8D FB 02 
60 



01 02 04 

08 

10 20 40 



9B 



A3 00 



01 



A3 

48 
AO 00 

84 OO 

A9 40 



B3 
01 



Ol 

00 



4P Ft 

AO 04 



HP0SN2 



•CUER CLEAR BACK FLO* 1 9 1 Tg 



CLER 



XCK 



142 

143 
144 
143 

146 

147 

140 

149 

130 

131 

132 

133 

134 

135 

134 

137 

138 CLOP 

139 

160 

161 

162 

163 

164 

163 

166 

167 

168 

169 

170 

171 

172 

173 

174 

175 

176 

177 

178 

179 

180 

181 

L82 

183 

184 

185 

186 

187 

188 

189 

190 

191 

192 

193 

194 

195 

196 

197 

198 

199 

2O0 

201 

202 

203 

204 

205 

206 

207 

208 

209 

210 

an 

212 



SBC 

BC5 
TAX 
LDA 
STA 
RTS 



••7 
HP0SN1 

MSKTBL-249. X 

HMASK 



SEC 

LDA 

SBC 

STA 

LDA 

SBC 

STA 

LDX 

LDV 

J5R 

LDA 

EOR 

AND 

STA 

CLC 

LDA 

ADC 

cnp 

LDA 

SDC 

INC 

ONE 

INC 

OCC 

LDA 

STA 

STA 

RTS 



XOL 

FLCL 

XL 

XOH 
FLGH 

XH 

XL 

XH 
XPDS 
HMASK 
•♦FF 

{HBASLl* V 

IHBASL1* V 

XL 

•tOl 

XOL 

XH 

XOH 
XL 

XOK 

XH 

CLOP 
UtOO 
FLCL 

FLCH 



FIND XO-FLO 

DOUBLE BVT£ 



WITH RESULT IN XL. XH 
SETUP FOB JtPOSN 



DELETE THE BIT 

ft Y* HMASK 

ON LINE HBASL 



FAKE OUT TEST SO 

THAT 

WE ONLY CO TO 

XO-1 



NOW INC XL. XH 

CONTINUE 

DONE CLEAR 
FLAG 



AND RETURN 



•MSKTBL HMASK LOOKUP TABLE 



rtSKTBL DFB *01. S02. t04> »08 

DFB *10, »20. «40 
PAGE 

* 

•HIRES PICK STUPID PICK ROUTINE 



•ALTM - *80 

•ALTM - *0O 

•COLR - tAA 

•COLR ■ *D3 

• 

ALTH 

COLA 

AIL 

AlH 

* 

•HIRES PICK 

HPICK 



LOCP 



FOR COLOR SET 1 

FOR COLOR SET 2 

FOR PURfcBLU 

FOR CRNfcORG 

EQU *2FE 
EQU »2FF 
EOU *00 
EQU *01 

OFF 

TYA 

PHA 

LDA AIL 

PHA 

LDA AlH 

PHA 

LDY UtOO 

STY AIL 

LDA *»40 

STA AlH 

LDA IA1LKY 

EOR ALTM 

BHI OKBYT 



* 

< 

< 

•a 

1 

k 



SAVE Y* X AND 2PQ 

•00 

401 

SET INDEX 

SET ZPG CTRS 

TO BEGINNING OF 
PICK UP BYTE 
CHANGE SETBIT 

IF RIGHT SET 
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6166 


A9 


00 


213 


6168 


FO 


OC 


214 


616A 


A3 


00 


213 OKBYT 


616C 


4A 




216 


616D 


AD 


FF 02 


217 


6170 


BO 


02 


218 


6172 


49 


7F 


219 


6174 


31 


00 


220 STOR 


6176 


91 


00 


221 ST0R1 


6178 


A3 


00 


222 


617A 


C9 


FF 


223 


617C 


A3 


01 


224 


617E 


E9 


3F 


225 


6180: 


E6 


OO 


226 


0182 


DO 


02 


227 


6184 


E6 


01 


226 


6186 


90 


D7 


229 CHLOP 


6188: 


68 




230 


o!89 


63 


01 


231 


618B 


68 




232 


618C: 


83 


00 


233 


618£ 


68 




234 


4I&F 


A6 




233 


6190 


60 




236 


6191: 






237 



LDA 


•00 


BEO 


STORi 


LDA 


AIL 


LSR 


A 


LDA 


COLR 


BCS 


STOR 


EOR 


#*7F 


AND 


(AID* Y 


5TA 


(AID* Y 


LDA 


AIL 


CMP 


*«FF 


LDA 


AlH 


SBC 


•«5F 


INC 


AIL 


BN€ 


CHLCP 


INC 


AlH 


BCC 


LOCP 


PLA 




STA 


AIM 


PLA 




STA 


AIL 


PLA 




TAY 




RTS 




PA£E 



WRONG 5ET CLP BYT 
ALWAYS TAKEN 

ARE ON ODD OR EVEN 
BYTE? THE CARRY KNOWS 

IF EVEN T>*N 
SHIFT ELSE STOR 
SHIFT MASK 
WIPE OUT EXTRA 
AND STORE IT 
GOTO NEXT BYTE 
WITH TEST FC* 

END OF HSCRN 

( «3FFF J 



CC ON NOT END 
RETURN Y AND ZPG 



••• SUCCESSFUL ASSEMBLY NO ERRORS 
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APPENDIX E 

SCHEMATIC DIAGRAM 




':! 














II 

ft 

s 
ft,,. 
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Moppkz computer vk. 

10260 Bandley Drive 

Cupertino. Catifomia 95014 

408 996-1010 



